/ APDL Eductation Resources / APDL Eductation Resources.iso / programs / games / puzzle / x_word / !X-Word / !RUNIMAGEB

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 44 10 9f e5 3c 20 9f e5 | 34 30 9f e5 04 00 12 e4 |D...< ..|40......|
|00000010| 04 00 03 e4 04 10 51 e2 | fb ff ff 5a 00 00 8f e2 |......Q.|...Z....|
|00000020| 05 00 00 ef 42 41 53 49 | 43 20 2d 51 75 69 74 20 |....BASI|C -Quit |
|00000030| 40 30 30 30 30 39 30 30 | 30 2c 30 30 30 31 42 32 |@0000900|0,0001B2|
|00000040| 33 38 00 01 38 b2 01 00 | 88 a2 01 00 38 22 01 00 |38..8...|....8"..|
|00000050| 0d 00 0a 1c 20 f4 20 3e | 24 2e 21 58 2d 57 6f 72 |.... . >|$.!X-Wor|
|00000060| 64 2e 21 52 55 4e 49 4d | 41 47 45 42 0d 00 1e 15 |d.!RUNIM|AGEB....|
|00000070| 20 c8 99 22 48 6f 75 72 | 67 6c 61 73 73 5f 4f 6e | .."Hour|glass_On|
|00000080| 22 0d 00 28 31 20 f2 73 | 65 74 75 70 3a f2 72 65 |"..(1 .s|etup:.re|
|00000090| 61 64 5f 76 65 72 3a f2 | 73 65 74 75 70 32 3a f2 |ad_ver:.|setup2:.|
|000000a0| 73 65 74 75 70 33 3a f2 | 63 68 65 63 6b 5f 70 61 |setup3:.|check_pa|
|000000b0| 74 68 0d 00 2b 47 20 e7 | 20 72 69 73 63 24 3e 3d |th..+G .| risc$>=|
|000000c0| 22 33 22 20 ff 28 22 52 | 4d 45 4e 53 55 52 45 20 |"3" .("R|MENSURE |
|000000d0| 44 72 61 77 46 69 6c 65 | 20 30 2e 30 20 52 4d 4c |DrawFile| 0.0 RML|
|000000e0| 4f 41 44 20 3c 4f 62 65 | 79 24 44 69 72 3e 2e 44 |OAD <Obe|y$Dir>.D|
|000000f0| 72 61 77 46 69 6c 65 22 | 29 0d 00 32 24 20 ee 20 |rawFile"|)..2$ . |
|00000100| 85 20 e7 20 a4 77 69 6d | 70 65 72 72 6f 72 20 c8 |. . .wim|perror .|
|00000110| 98 20 8b 20 f2 65 72 72 | 6f 72 3a c8 98 0d 00 3c |. . .err|or:....<|
|00000120| 2b 20 f2 72 6d 28 22 4d | 55 41 35 22 29 3a 72 65 |+ .rm("M|UA5"):re|
|00000130| 67 24 3d 22 2e 22 2b 74 | 65 78 74 24 3a f2 73 65 |g$="."+t|ext$:.se|
|00000140| 74 75 70 5f 68 65 6c 70 | 0d 00 46 2d 20 f2 63 6f |tup_help|..F- .co|
|00000150| 6c 6f 75 72 6d 65 6e 75 | 28 63 6f 6c 6d 65 6e 75 |lourmenu|(colmenu|
|00000160| 2c 31 29 3a f2 6d 61 69 | 6e 6d 65 6e 75 28 6d 6d |,1):.mai|nmenu(mm|
|00000170| 65 6e 75 25 29 0d 00 50 | 7d 20 f2 62 6f 72 64 65 |enu%)..P|} .borde|
|00000180| 72 73 28 62 6f 72 64 65 | 72 5f 70 61 74 68 24 29 |rs(borde|r_path$)|
|00000190| 3a e7 20 62 6f 72 64 65 | 72 73 24 28 31 29 3d 22 |:. borde|rs$(1)="|
|000001a0| 4e 6f 6e 65 22 20 62 6f | 72 64 65 72 5f 70 61 74 |None" bo|rder_pat|
|000001b0| 68 24 3d 70 61 74 68 24 | 2b 22 2e 42 6f 72 64 65 |h$=path$|+".Borde|
|000001c0| 72 73 22 3a 64 65 66 61 | 75 6c 74 5f 70 24 3d 62 |rs":defa|ult_p$=b|
|000001d0| 6f 72 64 65 72 5f 70 61 | 74 68 24 3a f2 62 6f 72 |order_pa|th$:.bor|
|000001e0| 64 65 72 73 28 62 6f 72 | 64 65 72 5f 70 61 74 68 |ders(bor|der_path|
|000001f0| 24 29 0d 00 5a 1f 20 f2 | 62 6f 72 64 65 72 73 6d |$)..Z. .|bordersm|
|00000200| 65 6e 75 28 62 6f 72 64 | 65 72 73 6d 65 6e 75 25 |enu(bord|ersmenu%|
|00000210| 29 0d 00 64 47 20 f2 73 | 74 61 72 74 75 70 5f 6d |)..dG .s|tartup_m|
|00000220| 65 6d 3a f2 67 72 61 62 | 5f 73 65 74 75 70 3a f2 |em:.grab|_setup:.|
|00000230| 72 65 61 64 66 6f 6e 74 | 73 3a f2 66 6f 6e 74 6d |readfont|s:.fontm|
|00000240| 65 6e 75 28 66 6f 6e 74 | 6d 65 6e 75 25 2c 31 29 |enu(font|menu%,1)|
|00000250| 3a f2 73 65 74 75 70 34 | 0d 00 6e 45 20 69 6d 5f |:.setup4|..nE im_|
|00000260| 74 79 70 65 24 3d 22 62 | 6f 72 64 65 72 22 3a 44 |type$="b|order":D|
|00000270| 4e 24 3d 28 70 61 74 68 | 24 2b 22 2e 62 61 6e 6e |N$=(path|$+".bann|
|00000280| 65 72 31 22 29 3a f2 69 | 6d 70 6f 72 74 5f 66 69 |er1"):.i|mport_fi|
|00000290| 6c 65 3a 73 61 76 65 64 | 5f 6f 6b 3d b9 0d 00 78 |le:saved|_ok=...x|
|000002a0| 18 20 c8 99 22 48 6f 75 | 72 67 6c 61 73 73 5f 53 |. .."Hou|rglass_S|
|000002b0| 6d 61 73 68 22 0d 00 82 | 5a 20 e7 20 63 6f 6d 64 |mash"...|Z . comd|
|000002c0| 24 3c 3e 22 22 20 f2 6c | 6f 61 64 28 63 6f 6d 64 |$<>"" .l|oad(comd|
|000002d0| 24 29 3a e7 20 c2 63 6f | 6d 64 24 2c 37 29 3c 3e |$):. .co|md$,7)<>|
|000002e0| 22 41 5a 66 61 75 6c 74 | 22 20 24 6e 61 6d 65 25 |"AZfault|" $name%|
|000002f0| 3d 63 6f 6d 64 24 3a f2 | 75 70 64 61 74 65 5f 74 |=comd$:.|update_t|
|00000300| 69 74 6c 65 3a 73 61 76 | 65 64 5f 6f 6b 3d b9 0d |itle:sav|ed_ok=..|
|00000310| 00 8c 26 20 e7 20 63 6f | 6d 64 24 3c 3e 22 22 20 |..& . co|md$<>"" |
|00000320| 63 6c 6f 73 65 64 25 3d | a3 20 8b 20 63 6c 6f 73 |closed%=|. . clos|
|00000330| 65 64 25 3d b9 0d 00 96 | 1e 20 ee 20 85 20 e7 20 |ed%=....|. . . . |
|00000340| a4 77 69 6d 70 65 72 72 | 6f 72 20 8b 20 f2 65 72 |.wimperr|or . .er|
|00000350| 72 6f 72 0d 00 a0 06 20 | f5 0d 00 aa 31 20 e7 20 |ror.... |....1 . |
|00000360| 63 6c 6f 73 65 64 25 20 | f2 69 63 6f 6e 62 61 72 |closed% |.iconbar|
|00000370| 77 61 69 74 3a e7 20 71 | 75 69 74 25 3d b9 20 f2 |wait:. q|uit%=. .|
|00000380| 63 6c 6f 73 65 5f 64 6f | 77 6e 0d 00 b4 0c 20 f2 |close_do|wn.... .|
|00000390| 72 65 67 62 6f 78 0d 00 | be 3b 20 f2 76 76 31 28 |regbox..|.; .vv1(|
|000003a0| 77 68 61 6e 64 6c 65 31 | 25 29 3a c8 99 22 57 69 |whandle1|%):.."Wi|
|000003b0| 6d 70 5f 53 65 74 43 61 | 72 65 74 50 6f 73 69 74 |mp_SetCa|retPosit|
|000003c0| 69 6f 6e 22 2c 77 68 61 | 6e 64 6c 65 31 25 2c 2d |ion",wha|ndle1%,-|
|000003d0| 31 0d 00 c8 2b 20 c8 99 | 22 57 69 6d 70 5f 53 65 |1...+ ..|"Wimp_Se|
|000003e0| 74 43 61 72 65 74 50 6f | 73 69 74 69 6f 6e 22 2c |tCaretPo|sition",|
|000003f0| 77 68 61 6e 64 6c 65 31 | 25 2c 2d 31 0d 00 d2 3d |whandle1|%,-1...=|
|00000400| 20 e7 20 73 61 76 65 5f | 64 69 61 3d 31 20 f2 6f | . save_|dia=1 .o|
|00000410| 70 65 6e 77 69 6e 64 6f | 77 32 28 77 68 61 6e 64 |penwindo|w2(whand|
|00000420| 6c 65 38 25 29 3a f2 63 | 61 72 65 74 28 30 2c 77 |le8%):.c|aret(0,w|
|00000430| 68 61 6e 64 6c 65 38 25 | 29 0d 00 dc 1d 20 71 75 |handle8%|).... qu|
|00000440| 69 74 25 3d a3 3a 63 6c | 6f 73 65 64 25 3d a3 3a |it%=.:cl|osed%=.:|
|00000450| 65 6e 64 25 3d a3 0d 00 | e6 06 20 f5 0d 00 fa 0b |end%=...|.. .....|
|00000460| 20 20 f2 70 6f 6c 6c 0d | 01 04 1d 20 fd 20 71 75 |  .poll.|... . qu|
|00000470| 69 74 25 20 84 20 63 6c | 6f 73 65 64 25 20 84 20 |it% . cl|osed% . |
|00000480| 65 6e 64 25 0d 01 18 18 | 20 e7 20 71 75 69 74 25 |end%....| . quit%|
|00000490| 20 f2 63 6c 6f 73 65 5f | 64 6f 77 6e 0d 01 22 30 | .close_|down.."0|
|000004a0| 20 63 6c 6f 73 65 64 25 | 3d b9 3a f2 63 6c 6f 73 | closed%|=.:.clos|
|000004b0| 65 61 6c 6c 3a c8 99 22 | 57 69 6d 70 5f 43 72 65 |eall:.."|Wimp_Cre|
|000004c0| 61 74 65 4d 65 6e 75 22 | 2c 2c 2d 31 0d 01 2c 0e |ateMenu"|,,-1..,.|
|000004d0| 20 fd 20 71 75 69 74 25 | 3d b9 0d 01 36 10 20 f4 | . quit%|=...6. .|
|000004e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 0d 01 40 11 20 dd |--------|--..@. .|
|000004f0| f2 63 6c 6f 73 65 5f 64 | 6f 77 6e 0d 01 4a 36 20 |.close_d|own..J6 |
|00000500| f2 63 6c 6f 73 65 61 6c | 6c 32 3a c8 99 22 4d 65 |.closeal|l2:.."Me|
|00000510| 73 73 61 67 65 54 72 61 | 6e 73 5f 43 6c 6f 73 65 |ssageTra|ns_Close|
|00000520| 46 69 6c 65 22 2c 6d 65 | 73 73 61 67 65 5f 70 74 |File",me|ssage_pt|
|00000530| 72 0d 01 54 23 20 c8 99 | 22 58 4f 53 5f 4d 6f 64 |r..T# ..|"XOS_Mod|
|00000540| 75 6c 65 22 2c 37 2c 2c | 6d 65 73 73 61 67 65 5f |ule",7,,|message_|
|00000550| 61 72 65 61 0d 01 59 0c | 20 f2 72 65 67 62 6f 78 |area..Y.| .regbox|
|00000560| 0d 01 5e 37 20 24 62 6c | 6f 63 6b 25 3d 22 54 41 |..^7 $bl|ock%="TA|
|00000570| 53 4b 22 3a c8 99 22 57 | 69 6d 70 5f 43 6c 6f 73 |SK":.."W|imp_Clos|
|00000580| 65 44 6f 77 6e 22 2c 74 | 61 73 6b 25 2c 21 62 6c |eDown",t|ask%,!bl|
|00000590| 6f 63 6b 25 3a c8 98 0d | 01 68 06 20 e1 0d 01 72 |ock%:...|.h. ...r|
|000005a0| 10 20 f4 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 0d 01 7c |. .-----|-----..||
|000005b0| 12 20 dd f2 69 63 6f 6e | 62 61 72 77 61 69 74 0d |. ..icon|barwait.|
|000005c0| 01 86 26 20 65 6e 64 25 | 3d a3 3a 63 6c 6f 73 65 |..& end%|=.:close|
|000005d0| 64 25 3d a3 3a 71 75 69 | 74 25 3d a3 3a 69 62 77 |d%=.:qui|t%=.:ibw|
|000005e0| 61 69 74 3d b9 0d 01 90 | 06 20 f5 0d 01 9a 24 20 |ait=....|. ....$ |
|000005f0| c8 99 22 57 69 6d 70 5f | 50 6f 6c 6c 22 2c 2c 62 |.."Wimp_|Poll",,b|
|00000600| 6c 6f 63 6b 25 20 b8 20 | 72 65 61 73 6f 6e 25 0d |lock% . |reason%.|
|00000610| 01 a4 11 20 c8 8e 20 72 | 65 61 73 6f 6e 25 20 ca |... .. r|eason% .|
|00000620| 0d 01 ae 0f 20 c9 20 36 | 3a f2 6d 6f 75 73 65 0d |.... . 6|:.mouse.|
|00000630| 01 b8 26 20 c9 20 38 3a | c8 99 22 57 69 6d 70 5f |..& . 8:|.."Wimp_|
|00000640| 50 72 6f 63 65 73 73 4b | 65 79 22 2c 62 6c 6f 63 |ProcessK|ey",bloc|
|00000650| 6b 25 21 32 34 0d 01 c2 | 18 20 c9 20 39 3a f2 69 |k%!24...|. . 9:.i|
|00000660| 63 6f 6e 62 61 72 6f 70 | 74 69 6f 6e 73 0d 01 cc |conbarop|tions...|
|00000670| 19 20 c9 20 31 37 2c 31 | 38 3a f2 69 63 6f 6e 72 |. . 17,1|8:.iconr|
|00000680| 65 63 65 69 76 65 0d 01 | d6 06 20 cb 0d 01 e0 13 |eceive..|.. .....|
|00000690| 20 fd 20 65 6e 64 25 20 | 84 20 71 75 69 74 25 0d | . end% |. quit%.|
|000006a0| 01 e1 0d 20 69 62 77 61 | 69 74 3d a3 0d 01 ea 06 |... ibwa|it=.....|
|000006b0| 20 e1 0d 01 f4 11 20 f4 | 2d 2d 2d 2d 2d 2d 2d 2d | ..... .|--------|
|000006c0| 2d 2d 2d 0d 01 fe 15 20 | dd f2 69 63 6f 6e 62 61 |---.... |..iconba|
|000006d0| 72 6f 70 74 69 6f 6e 73 | 0d 02 08 14 20 63 68 6f |roptions|.... cho|
|000006e0| 69 63 65 25 3d 21 62 6c | 6f 63 6b 25 0d 02 09 13 |ice%=!bl|ock%....|
|000006f0| 20 e7 20 73 61 76 65 64 | 5f 6f 6b 3d a3 20 8c 0d | . saved|_ok=. ..|
|00000700| 02 12 24 20 20 e7 20 63 | 68 6f 69 63 65 25 3d 31 |..$  . c|hoice%=1|
|00000710| 20 f2 76 65 72 69 66 79 | 73 68 75 74 64 6f 77 6e | .verify|shutdown|
|00000720| 32 3a e1 0d 02 14 06 20 | cc 0d 02 1c 16 20 20 65 |2:..... |.....  e|
|00000730| 6e 64 25 3d b9 3a 71 75 | 69 74 25 3d b9 3a e1 0d |nd%=.:qu|it%=.:..|
|00000740| 02 1e 06 20 cd 0d 02 26 | 06 20 e1 0d 02 30 10 20 |... ...&|. ...0. |
|00000750| f4 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 0d 02 3a 12 20 |.-------|---..:. |
|00000760| dd f2 69 63 6f 6e 72 65 | 63 65 69 76 65 0d 02 44 |..iconre|ceive..D|
|00000770| 13 20 c8 8e 20 62 6c 6f | 63 6b 25 21 31 36 20 ca |. .. blo|ck%!16 .|
|00000780| 0d 02 4e 12 20 c9 20 30 | 3a 71 75 69 74 25 3d b9 |..N. . 0|:quit%=.|
|00000790| 3a e1 0d 02 58 08 20 c9 | 20 33 0d 02 62 19 20 20 |:...X. .| 3..b.  |
|000007a0| e7 20 62 6c 6f 63 6b 25 | 21 34 30 3d 26 32 30 30 |. block%|!40=&200|
|000007b0| 30 20 8c 0d 02 6c 13 20 | 20 20 65 6e 64 25 3d b9 |0 ...l. |  end%=.|
|000007c0| 3a f2 64 72 61 67 0d 02 | 76 07 20 20 cd 0d 02 80 |:.drag..|v.  ....|
|000007d0| 15 20 c9 20 35 3a f2 64 | 6f 75 62 6c 65 63 6c 69 |. . 5:.d|oublecli|
|000007e0| 63 6b 0d 02 8a 1c 20 c9 | 20 26 34 30 30 43 31 3a |ck.... .| &400C1:|
|000007f0| f2 6d 6f 64 65 5f 63 68 | 61 6e 67 65 64 32 0d 02 |.mode_ch|anged2..|
|00000800| 94 06 20 cb 0d 02 9e 06 | 20 e1 0d 02 a8 10 20 f4 |.. .....| ..... .|
|00000810| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 0d 02 b2 0f 20 dd |--------|--.... .|
|00000820| f2 63 6c 6f 73 65 61 6c | 6c 0d 02 bc 3f 20 62 6c |.closeal|l...? bl|
|00000830| 6f 63 6b 25 21 30 3d 77 | 68 61 6e 64 6c 65 31 25 |ock%!0=w|handle1%|
|00000840| 3a c8 99 22 57 69 6d 70 | 5f 43 6c 6f 73 65 57 69 |:.."Wimp|_CloseWi|
|00000850| 6e 64 6f 77 22 2c 2c 62 | 6c 6f 63 6b 25 3a f2 63 |ndow",,b|lock%:.c|
|00000860| 6c 6f 73 65 61 6c 6c 32 | 0d 02 c6 06 20 e1 0d 02 |loseall2|.... ...|
|00000870| d0 10 20 f4 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 0d 02 |.. .----|------..|
|00000880| da 10 20 dd f2 63 6c 6f | 73 65 61 6c 6c 32 0d 02 |.. ..clo|seall2..|
|00000890| e4 34 20 62 6c 6f 63 6b | 25 21 30 3d 77 68 61 6e |.4 block|%!0=whan|
|000008a0| 64 6c 65 38 25 3a c8 99 | 22 57 69 6d 70 5f 43 6c |dle8%:..|"Wimp_Cl|
|000008b0| 6f 73 65 57 69 6e 64 6f | 77 22 2c 2c 62 6c 6f 63 |oseWindo|w",,bloc|
|000008c0| 6b 25 0d 02 ee 35 20 62 | 6c 6f 63 6b 25 21 30 3d |k%...5 b|lock%!0=|
|000008d0| 77 68 61 6e 64 6c 65 31 | 31 25 3a c8 99 22 57 69 |whandle1|1%:.."Wi|
|000008e0| 6d 70 5f 43 6c 6f 73 65 | 57 69 6e 64 6f 77 22 2c |mp_Close|Window",|
|000008f0| 2c 62 6c 6f 63 6b 25 0d | 02 f8 35 20 62 6c 6f 63 |,block%.|..5 bloc|
|00000900| 6b 25 21 30 3d 77 68 61 | 6e 64 6c 65 31 34 25 3a |k%!0=wha|ndle14%:|
|00000910| c8 99 22 57 69 6d 70 5f | 43 6c 6f 73 65 57 69 6e |.."Wimp_|CloseWin|
|00000920| 64 6f 77 22 2c 2c 62 6c | 6f 63 6b 25 0d 03 02 34 |dow",,bl|ock%...4|
|00000930| 20 62 6c 6f 63 6b 25 21 | 30 3d 66 6f 6e 74 5f 77 | block%!|0=font_w|
|00000940| 69 6e 25 3a c8 99 22 57 | 69 6d 70 5f 43 6c 6f 73 |in%:.."W|imp_Clos|
|00000950| 65 57 69 6e 64 6f 77 22 | 2c 2c 62 6c 6f 63 6b 25 |eWindow"|,,block%|
|00000960| 0d 03 0c 65 20 62 6c 6f | 63 6b 25 21 30 3d 67 72 |...e blo|ck%!0=gr|
|00000970| 69 64 5f 73 69 7a 65 25 | 3a c8 99 22 57 69 6d 70 |id_size%|:.."Wimp|
|00000980| 5f 43 6c 6f 73 65 57 69 | 6e 64 6f 77 22 2c 2c 62 |_CloseWi|ndow",,b|
|00000990| 6c 6f 63 6b 25 3a 62 6c | 6f 63 6b 25 21 30 3d 6c |lock%:bl|ock%!0=l|
|000009a0| 69 73 74 5f 77 69 6e 25 | 3a c8 99 22 57 69 6d 70 |ist_win%|:.."Wimp|
|000009b0| 5f 43 6c 6f 73 65 57 69 | 6e 64 6f 77 22 2c 2c 62 |_CloseWi|ndow",,b|
|000009c0| 6c 6f 63 6b 25 0d 03 16 | 35 20 62 6c 6f 63 6b 25 |lock%...|5 block%|
|000009d0| 21 30 3d 74 6f 6f 6c 73 | 5f 77 69 6e 25 3a c8 99 |!0=tools|_win%:..|
|000009e0| 22 57 69 6d 70 5f 43 6c | 6f 73 65 57 69 6e 64 6f |"Wimp_Cl|oseWindo|
|000009f0| 77 22 2c 2c 62 6c 6f 63 | 6b 25 0d 03 20 06 20 e1 |w",,bloc|k%.. . .|
|00000a00| 0d 03 2a 10 20 f4 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |..*. .--|--------|
|00000a10| 0d 03 34 13 20 dd f2 6d | 6f 64 65 5f 63 68 61 6e |..4. ..m|ode_chan|
|00000a20| 67 65 64 0d 03 3e 0f 20 | 73 61 76 65 5f 64 69 61 |ged..>. |save_dia|
|00000a30| 3d 30 0d 03 48 3e 20 69 | 6e 25 21 30 3d 31 32 3a |=0..H> i|n%!0=12:|
|00000a40| 69 6e 25 21 34 3d 35 3a | 69 6e 25 21 38 3d 2d 31 |in%!4=5:|in%!8=-1|
|00000a50| 3a c8 99 22 4f 53 5f 52 | 65 61 64 56 64 75 56 61 |:.."OS_R|eadVduVa|
|00000a60| 72 69 61 62 6c 65 73 22 | 2c 69 6e 25 2c 6f 75 25 |riables"|,in%,ou%|
|00000a70| 0d 03 52 2a 20 74 6f 70 | 5f 79 3d 28 6f 75 25 21 |..R* top|_y=(ou%!|
|00000a80| 30 29 2b 31 3a 74 6f 70 | 5f 79 3d 28 32 5e 6f 75 |0)+1:top|_y=(2^ou|
|00000a90| 25 21 34 29 2a 74 6f 70 | 5f 79 0d 03 5c 3e 20 69 |%!4)*top|_y..\> i|
|00000aa0| 6e 25 21 30 3d 31 31 3a | 69 6e 25 21 34 3d 34 3a |n%!0=11:|in%!4=4:|
|00000ab0| 69 6e 25 21 38 3d 2d 31 | 3a c8 99 22 4f 53 5f 52 |in%!8=-1|:.."OS_R|
|00000ac0| 65 61 64 56 64 75 56 61 | 72 69 61 62 6c 65 73 22 |eadVduVa|riables"|
|00000ad0| 2c 69 6e 25 2c 6f 75 25 | 0d 03 66 2a 20 74 6f 70 |,in%,ou%|..f* top|
|00000ae0| 5f 78 3d 28 6f 75 25 21 | 30 29 2b 31 3a 74 6f 70 |_x=(ou%!|0)+1:top|
|00000af0| 5f 78 3d 28 32 5e 6f 75 | 25 21 34 29 2a 74 6f 70 |_x=(2^ou|%!4)*top|
|00000b00| 5f 78 0d 03 70 1a 20 e7 | 20 6f 6c 64 5f 73 74 79 |_x..p. .| old_sty|
|00000b10| 6c 65 5f 6d 6f 64 65 3c | 3e eb 20 8c 0d 03 7a 20 |le_mode<|>. ...z |
|00000b20| 20 20 f2 67 72 61 62 5f | 73 65 74 75 70 3a f2 73 |  .grab_|setup:.s|
|00000b30| 74 79 6c 65 31 28 31 2c | 30 2c 30 29 0d 03 84 06 |tyle1(1,|0,0)....|
|00000b40| 20 cd 0d 03 8e 14 20 f2 | 76 76 31 28 77 68 61 6e | ..... .|vv1(whan|
|00000b50| 64 6c 65 31 25 29 0d 03 | 98 06 20 e1 0d 03 a2 10 |dle1%)..|.. .....|
|00000b60| 20 f4 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 0d 03 ac 14 | .------|----....|
|00000b70| 20 dd f2 6d 6f 64 65 5f | 63 68 61 6e 67 65 64 32 | ..mode_|changed2|
|00000b80| 0d 03 b6 0f 20 73 61 76 | 65 5f 64 69 61 3d 30 0d |.... sav|e_dia=0.|
|00000b90| 03 c0 3e 20 69 6e 25 21 | 30 3d 31 32 3a 69 6e 25 |..> in%!|0=12:in%|
|00000ba0| 21 34 3d 35 3a 69 6e 25 | 21 38 3d 2d 31 3a c8 99 |!4=5:in%|!8=-1:..|
|00000bb0| 22 4f 53 5f 52 65 61 64 | 56 64 75 56 61 72 69 61 |"OS_Read|VduVaria|
|00000bc0| 62 6c 65 73 22 2c 69 6e | 25 2c 6f 75 25 0d 03 ca |bles",in|%,ou%...|
|00000bd0| 2a 20 74 6f 70 5f 79 3d | 28 6f 75 25 21 30 29 2b |* top_y=|(ou%!0)+|
|00000be0| 31 3a 74 6f 70 5f 79 3d | 28 32 5e 6f 75 25 21 34 |1:top_y=|(2^ou%!4|
|00000bf0| 29 2a 74 6f 70 5f 79 0d | 03 d4 3e 20 69 6e 25 21 |)*top_y.|..> in%!|
|00000c00| 30 3d 31 31 3a 69 6e 25 | 21 34 3d 34 3a 69 6e 25 |0=11:in%|!4=4:in%|
|00000c10| 21 38 3d 2d 31 3a c8 99 | 22 4f 53 5f 52 65 61 64 |!8=-1:..|"OS_Read|
|00000c20| 56 64 75 56 61 72 69 61 | 62 6c 65 73 22 2c 69 6e |VduVaria|bles",in|
|00000c30| 25 2c 6f 75 25 0d 03 de | 2a 20 74 6f 70 5f 78 3d |%,ou%...|* top_x=|
|00000c40| 28 6f 75 25 21 30 29 2b | 31 3a 74 6f 70 5f 78 3d |(ou%!0)+|1:top_x=|
|00000c50| 28 32 5e 6f 75 25 21 34 | 29 2a 74 6f 70 5f 78 0d |(2^ou%!4|)*top_x.|
|00000c60| 03 e8 1a 20 e7 20 6f 6c | 64 5f 73 74 79 6c 65 5f |... . ol|d_style_|
|00000c70| 6d 6f 64 65 3c 3e eb 20 | 8c 0d 03 f2 20 20 20 f2 |mode<>. |....   .|
|00000c80| 67 72 61 62 5f 73 65 74 | 75 70 3a f2 73 74 79 6c |grab_set|up:.styl|
|00000c90| 65 31 28 31 2c 30 2c 30 | 29 0d 03 fc 06 20 cd 0d |e1(1,0,0|).... ..|
|00000ca0| 04 06 06 20 e1 0d 04 10 | 10 20 f4 2d 2d 2d 2d 2d |... ....|. .-----|
|00000cb0| 2d 2d 2d 2d 2d 0d 04 1a | 10 20 dd f2 6d 69 6e 69 |-----...|. ..mini|
|00000cc0| 5f 70 6f 6c 6c 0d 04 24 | 08 20 54 3d 30 0d 04 2e |_poll..$|. T=0...|
|00000cd0| 06 20 f5 0d 04 38 28 20 | 20 c8 99 22 57 69 6d 70 |. ...8( | .."Wimp|
|00000ce0| 5f 50 6f 6c 6c 22 2c 26 | 30 30 2c 62 6c 6f 63 6b |_Poll",&|00,block|
|00000cf0| 25 20 b8 20 72 65 61 73 | 6f 6e 25 0d 04 42 12 20 |% . reas|on%..B. |
|00000d00| 20 c8 8e 20 72 65 61 73 | 6f 6e 25 20 ca 0d 04 4c | .. reas|on% ...L|
|00000d10| 13 20 20 20 c9 20 31 20 | 3a f2 72 65 64 72 61 77 |.   . 1 |:.redraw|
|00000d20| 0d 04 56 27 20 20 20 c9 | 20 32 20 3a c8 99 22 57 |..V'   .| 2 :.."W|
|00000d30| 69 6d 70 5f 4f 70 65 6e | 57 69 6e 64 6f 77 22 2c |imp_Open|Window",|
|00000d40| 2c 62 6c 6f 63 6b 25 0d | 04 60 07 20 20 cb 0d 04 |,block%.|.`.  ...|
|00000d50| 6a 0a 20 20 54 2b 3d 31 | 0d 04 74 0a 20 fd 20 54 |j.  T+=1|..t. . T|
|00000d60| 3e 33 0d 04 7e 06 20 e1 | 0d 04 88 10 20 f4 2d 2d |>3..~. .|.... .--|
|00000d70| 2d 2d 2d 2d 2d 2d 2d 2d | 0d 04 92 0b 20 dd f2 70 |--------|.... ..p|
|00000d80| 6f 6c 6c 0d 04 9c 10 20 | f2 63 68 65 63 6b 5f 6e |oll.... |.check_n|
|00000d90| 61 6d 65 0d 04 a6 27 20 | c8 99 22 57 69 6d 70 5f |ame...' |.."Wimp_|
|00000da0| 50 6f 6c 6c 22 2c 26 30 | 30 2c 62 6c 6f 63 6b 25 |Poll",&0|0,block%|
|00000db0| 20 b8 20 72 65 61 73 6f | 6e 25 0d 04 b0 11 20 c8 | . reaso|n%.... .|
|00000dc0| 8e 20 72 65 61 73 6f 6e | 25 20 ca 0d 04 ba 12 20 |. reason|% ..... |
|00000dd0| 20 c9 20 31 20 3a f2 72 | 65 64 72 61 77 0d 04 c4 | . 1 :.r|edraw...|
|00000de0| 20 20 20 c9 20 32 20 3a | f2 6f 70 65 6e 77 69 6e |   . 2 :|.openwin|
|00000df0| 64 6f 77 28 62 6c 6f 63 | 6b 25 21 30 29 0d 04 ce |dow(bloc|k%!0)...|
|00000e00| 17 20 20 c9 20 33 20 3a | f2 77 68 69 63 68 5f 63 |.  . 3 :|.which_c|
|00000e10| 6c 6f 73 65 0d 04 d8 15 | 20 20 c9 20 36 20 3a f2 |lose....|  . 6 :.|
|00000e20| 65 64 69 74 6d 6f 75 73 | 65 0d 04 e2 14 20 20 c9 |editmous|e....  .|
|00000e30| 20 37 20 3a f2 63 61 6c | 6c 73 61 76 65 0d 04 ec | 7 :.cal|lsave...|
|00000e40| 14 20 20 c9 20 38 20 3a | f2 6b 65 79 70 72 65 73 |.  . 8 :|.keypres|
|00000e50| 73 0d 04 f6 18 20 20 c9 | 20 39 20 3a f2 6f 70 74 |s....  .| 9 :.opt|
|00000e60| 69 6f 6e 73 65 6c 65 63 | 74 0d 05 00 1a 20 20 c9 |ionselec|t....  .|
|00000e70| 20 31 37 2c 31 38 3a f2 | 72 65 63 65 69 76 65 64 | 17,18:.|received|
|00000e80| 61 74 61 0d 05 0a 06 20 | cb 0d 05 14 1d 20 e7 20 |ata.... |..... . |
|00000e90| 6e 65 77 5f 66 69 74 74 | 69 6e 67 3d b9 20 f2 66 |new_fitt|ing=. .f|
|00000ea0| 69 74 74 69 6e 67 0d 05 | 1e 20 20 e7 20 66 6f 6e |itting..|.  . fon|
|00000eb0| 74 5f 6e 6f 74 3d 31 20 | f2 66 6f 6e 74 5f 6e 6f |t_not=1 |.font_no|
|00000ec0| 74 66 6f 75 6e 64 0d 05 | 28 06 20 e1 0d 05 32 10 |tfound..|(. ...2.|
|00000ed0| 20 f4 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 0d 05 3c 12 | .------|----..<.|
|00000ee0| 20 dd f2 77 68 69 63 68 | 5f 63 6c 6f 73 65 0d 05 | ..which|_close..|
|00000ef0| 46 41 20 e7 20 62 6c 6f | 63 6b 25 21 30 3c 3e 77 |FA . blo|ck%!0<>w|
|00000f00| 68 61 6e 64 6c 65 31 25 | 20 c8 99 22 57 69 6d 70 |handle1%| .."Wimp|
|00000f10| 5f 53 65 74 43 61 72 65 | 74 50 6f 73 69 74 69 6f |_SetCare|tPositio|
|00000f20| 6e 22 2c 77 68 61 6e 64 | 6c 65 31 25 2c 2d 31 0d |n",whand|le1%,-1.|
|00000f30| 05 50 2d 20 e7 20 62 6c | 6f 63 6b 25 21 30 3d 77 |.P- . bl|ock%!0=w|
|00000f40| 68 61 6e 64 6c 65 31 25 | 20 f2 63 6c 6f 73 65 61 |handle1%| .closea|
|00000f50| 6c 6c 3a 63 6c 6f 73 65 | 64 25 3d b9 0d 05 5a 1c |ll:close|d%=...Z.|
|00000f60| 20 e7 20 62 6c 6f 63 6b | 25 21 30 3d 77 68 61 6e | . block|%!0=whan|
|00000f70| 64 6c 65 31 31 25 20 8c | 0d 05 64 19 20 20 62 6f |dle11% .|..d.  bo|
|00000f80| 72 64 65 72 5f 70 61 74 | 68 24 3d 6f 6c 64 5f 70 |rder_pat|h$=old_p|
|00000f90| 24 0d 05 6e 22 20 20 c8 | 99 22 57 69 6d 70 5f 43 |$..n"  .|."Wimp_C|
|00000fa0| 6c 6f 73 65 57 69 6e 64 | 6f 77 22 2c 2c 62 6c 6f |loseWind|ow",,blo|
|00000fb0| 63 6b 25 0d 05 78 06 20 | cd 0d 05 82 36 20 e7 20 |ck%..x. |....6 . |
|00000fc0| 62 6c 6f 63 6b 25 21 30 | 3d 66 6f 6e 74 5f 77 69 |block%!0|=font_wi|
|00000fd0| 6e 25 20 c8 99 22 57 69 | 6d 70 5f 43 6c 6f 73 65 |n% .."Wi|mp_Close|
|00000fe0| 57 69 6e 64 6f 77 22 2c | 2c 62 6c 6f 63 6b 25 0d |Window",|,block%.|
|00000ff0| 05 8c 67 20 e7 20 62 6c | 6f 63 6b 25 21 30 3d 67 |..g . bl|ock%!0=g|
|00001000| 72 69 64 5f 73 69 7a 65 | 25 20 c8 99 22 57 69 6d |rid_size|% .."Wim|
|00001010| 70 5f 43 6c 6f 73 65 57 | 69 6e 64 6f 77 22 2c 2c |p_CloseW|indow",,|
|00001020| 62 6c 6f 63 6b 25 3a 62 | 6c 6f 63 6b 25 21 30 3d |block%:b|lock%!0=|
|00001030| 6c 69 73 74 5f 77 69 6e | 25 3a c8 99 22 57 69 6d |list_win|%:.."Wim|
|00001040| 70 5f 43 6c 6f 73 65 57 | 69 6e 64 6f 77 22 2c 2c |p_CloseW|indow",,|
|00001050| 62 6c 6f 63 6b 25 0d 05 | 96 37 20 e7 20 62 6c 6f |block%..|.7 . blo|
|00001060| 63 6b 25 21 30 3d 77 68 | 61 6e 64 6c 65 31 34 25 |ck%!0=wh|andle14%|
|00001070| 20 c8 99 22 57 69 6d 70 | 5f 43 6c 6f 73 65 57 69 | .."Wimp|_CloseWi|
|00001080| 6e 64 6f 77 22 2c 2c 62 | 6c 6f 63 6b 25 0d 05 a0 |ndow",,b|lock%...|
|00001090| 06 20 e1 0d 05 aa 11 20 | f4 2d 2d 2d 2d 2d 2d 2d |. ..... |.-------|
|000010a0| 2d 2d 2d 2d 0d 05 b4 12 | 20 dd f2 72 65 63 65 69 |----....| ..recei|
|000010b0| 76 65 64 61 74 61 0d 05 | be 13 20 c8 8e 20 62 6c |vedata..|.. .. bl|
|000010c0| 6f 63 6b 25 21 31 36 20 | ca 0d 05 c8 11 20 20 c9 |ock%!16 |.....  .|
|000010d0| 20 30 3a 71 75 69 74 25 | 3d b9 0d 05 d2 18 20 20 | 0:quit%|=.....  |
|000010e0| c9 20 31 3a f2 64 61 74 | 61 5f 73 61 76 65 5f 72 |. 1:.dat|a_save_r|
|000010f0| 65 63 0d 05 dc 13 20 20 | c9 20 32 3a f2 73 61 76 |ec....  |. 2:.sav|
|00001100| 65 64 61 74 61 0d 05 e6 | 0f 20 20 c9 20 33 3a f2 |edata...|.  . 3:.|
|00001110| 64 72 61 67 0d 05 f0 16 | 20 20 c9 20 35 3a f2 64 |drag....|  . 5:.d|
|00001120| 6f 75 62 6c 65 63 6c 69 | 63 6b 0d 05 fa 1c 20 20 |oublecli|ck....  |
|00001130| c9 20 26 34 30 30 43 31 | 3a f2 6d 6f 64 65 5f 63 |. &400C1|:.mode_c|
|00001140| 68 61 6e 67 65 64 0d 05 | fc 18 20 20 c9 20 26 35 |hanged..|..  . &5|
|00001150| 30 32 3a f2 69 6e 74 65 | 72 5f 68 65 6c 70 0d 06 |02:.inte|r_help..|
|00001160| 04 06 20 cb 0d 06 0e 06 | 20 e1 0d 06 18 10 20 f4 |.. .....| ..... .|
|00001170| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 0d 06 22 12 20 dd |--------|--..". .|
|00001180| f2 64 6f 75 62 6c 65 63 | 6c 69 63 6b 0d 06 2c 32 |.doublec|lick..,2|
|00001190| 20 52 30 3d 30 3a 66 69 | 6c 65 74 79 70 65 25 3d | R0=0:fi|letype%=|
|000011a0| 62 6c 6f 63 6b 25 21 34 | 30 3a e7 20 66 69 6c 65 |block%!4|0:. file|
|000011b0| 74 79 70 65 25 3c 3e 26 | 32 30 30 30 20 e1 0d 06 |type%<>&|2000 ...|
|000011c0| 40 11 20 44 4e 24 3d 22 | 22 3a 61 25 3d 2d 31 0d |@. DN$="|":a%=-1.|
|000011d0| 06 4a 25 20 f5 20 61 25 | 2b 3d 31 3a 62 25 3d 62 |.J% . a%|+=1:b%=b|
|000011e0| 6c 6f 63 6b 25 3f 28 34 | 34 2b 61 25 29 3a fd 20 |lock%?(4|4+a%):. |
|000011f0| 62 25 3d 30 0d 06 54 30 | 20 62 6c 6f 63 6b 25 3f |b%=0..T0| block%?|
|00001200| 28 34 34 2b 61 25 29 3d | 31 33 3a 44 4e 24 3d 24 |(44+a%)=|13:DN$=$|
|00001210| 28 62 6c 6f 63 6b 25 2b | 34 34 29 3a 62 65 72 72 |(block%+|44):berr|
|00001220| 6f 72 3d 30 0d 06 5e 32 | 20 6b 6b 24 3d 44 4e 24 |or=0..^2| kk$=DN$|
|00001230| 2b 22 2e 58 77 6f 72 64 | 5f 44 61 74 61 22 3a c8 |+".Xword|_Data":.|
|00001240| 99 22 4f 53 5f 46 69 6c | 65 22 2c 31 37 2c 6b 6b |."OS_Fil|e",17,kk|
|00001250| 24 20 b8 20 52 30 0d 06 | 68 0d 20 e7 20 52 30 3d |$ . R0..|h. . R0=|
|00001260| 30 20 e1 0d 06 69 16 20 | e7 20 69 62 77 61 69 74 |0 ...i. |. ibwait|
|00001270| 3d b9 20 65 6e 64 25 3d | b9 0d 06 72 23 20 62 6c |=. end%=|...r# bl|
|00001280| 6f 63 6b 25 21 31 32 3d | 62 6c 6f 63 6b 25 21 38 |ock%!12=|block%!8|
|00001290| 3a 62 6c 6f 63 6b 25 21 | 31 36 3d 34 0d 06 7c 2c |:block%!|16=4..|,|
|000012a0| 20 c8 99 22 57 69 6d 70 | 5f 53 65 6e 64 4d 65 73 | .."Wimp|_SendMes|
|000012b0| 73 61 67 65 22 2c 31 37 | 2c 62 6c 6f 63 6b 25 2c |sage",17|,block%,|
|000012c0| 62 6c 6f 63 6b 25 21 34 | 0d 06 90 12 20 c8 8e 20 |block%!4|.... .. |
|000012d0| 73 61 76 65 64 5f 6f 6b | 20 ca 0d 06 9a 08 20 c9 |saved_ok| ..... .|
|000012e0| 20 a3 0d 06 a4 35 20 20 | f2 72 6d 28 22 42 55 54 | ....5  |.rm("BUT|
|000012f0| 36 22 29 3a 62 75 74 31 | 24 3d 74 65 78 74 24 3a |6"):but1|$=text$:|
|00001300| f2 72 6d 28 22 42 55 54 | 34 22 29 3a 62 75 74 32 |.rm("BUT|4"):but2|
|00001310| 24 3d 74 65 78 74 24 0d | 06 ae 2b 20 20 f2 72 6d |$=text$.|..+  .rm|
|00001320| 28 22 41 4c 54 31 22 29 | 3a f2 61 6c 65 72 74 28 |("ALT1")|:.alert(|
|00001330| 74 65 78 74 24 2c 62 75 | 74 31 24 2c 62 75 74 32 |text$,bu|t1$,but2|
|00001340| 24 29 0d 06 b8 11 20 20 | e7 20 61 6c 65 72 74 3d |$)....  |. alert=|
|00001350| 30 20 e1 0d 06 c2 06 20 | cb 0d 06 cc 33 20 f2 6c |0 ..... |....3 .l|
|00001360| 6f 61 64 28 44 4e 24 29 | 3a 24 6e 61 6d 65 25 3d |oad(DN$)|:$name%=|
|00001370| 44 4e 24 3a f2 75 70 64 | 61 74 65 5f 74 69 74 6c |DN$:.upd|ate_titl|
|00001380| 65 3a 73 61 76 65 64 5f | 6f 6b 3d b9 0d 06 d6 06 |e:saved_|ok=.....|
|00001390| 20 e1 0d 06 e0 10 20 f4 | 2d 2d 2d 2d 2d 2d 2d 2d | ..... .|--------|
|000013a0| 2d 2d 0d 06 ea 0b 20 dd | f2 64 72 61 67 0d 06 f4 |--.... .|.drag...|
|000013b0| 25 20 66 69 6c 65 74 79 | 70 65 25 3d 62 6c 6f 63 |% filety|pe%=bloc|
|000013c0| 6b 25 21 34 30 3a 44 4e | 24 3d 22 22 3a 61 25 3d |k%!40:DN|$="":a%=|
|000013d0| 2d 31 0d 06 fe 25 20 f5 | 20 61 25 2b 3d 31 3a 62 |-1...% .| a%+=1:b|
|000013e0| 25 3d 62 6c 6f 63 6b 25 | 3f 28 34 34 2b 61 25 29 |%=block%|?(44+a%)|
|000013f0| 3a fd 20 62 25 3d 30 0d | 07 08 2e 20 62 6c 6f 63 |:. b%=0.|... bloc|
|00001400| 6b 25 3f 28 34 34 2b 61 | 25 29 3d 31 33 3a 44 4e |k%?(44+a|%)=13:DN|
|00001410| 24 3d 24 28 62 6c 6f 63 | 6b 25 2b 34 34 29 3a 4d |$=$(bloc|k%+44):M|
|00001420| 55 24 3d 22 22 0d 07 12 | 22 20 e7 20 66 69 6c 65 |U$=""...|" . file|
|00001430| 74 79 70 65 25 3d 26 32 | 30 30 30 20 f2 77 73 71 |type%=&2|000 .wsq|
|00001440| 5f 66 69 6c 65 3a e1 0d | 07 1c 1c 20 e7 20 62 6c |_file:..|... . bl|
|00001450| 6f 63 6b 25 21 32 30 3d | 77 68 61 6e 64 6c 65 31 |ock%!20=|whandle1|
|00001460| 25 20 8c 0d 07 26 33 20 | 20 69 6d 5f 74 79 70 65 |% ...&3 | im_type|
|00001470| 24 3d 22 62 6f 72 64 65 | 72 22 3a f2 69 6d 70 6f |$="borde|r":.impo|
|00001480| 72 74 5f 66 69 6c 65 3a | f2 73 74 79 6c 65 31 28 |rt_file:|.style1(|
|00001490| 31 2c 30 2c 30 29 0d 07 | 30 31 20 20 c8 99 22 57 |1,0,0)..|01  .."W|
|000014a0| 69 6d 70 5f 46 6f 72 63 | 65 52 65 64 72 61 77 22 |imp_Forc|eRedraw"|
|000014b0| 2c 77 68 61 6e 64 6c 65 | 31 25 2c 30 2c 2d 39 30 |,whandle|1%,0,-90|
|000014c0| 30 2c 37 30 30 2c 30 0d | 07 3a 07 20 20 e1 0d 07 |0,700,0.|.:.  ...|
|000014d0| 44 06 20 cd 0d 07 4e 23 | 20 e7 20 62 6c 6f 63 6b |D. ...N#| . block|
|000014e0| 25 21 32 30 3d 77 68 61 | 6e 64 6c 65 31 31 25 20 |%!20=wha|ndle11% |
|000014f0| f2 64 72 61 67 5f 32 0d | 07 58 06 20 e1 0d 07 62 |.drag_2.|.X. ...b|
|00001500| 10 20 f4 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 0d 07 6c |. .-----|-----..l|
|00001510| 0f 20 dd f2 77 73 71 5f | 66 69 6c 65 0d 07 76 32 |. ..wsq_|file..v2|
|00001520| 20 6b 6b 24 3d 44 4e 24 | 2b 22 2e 58 77 6f 72 64 | kk$=DN$|+".Xword|
|00001530| 5f 44 61 74 61 22 3a c8 | 99 22 4f 53 5f 46 69 6c |_Data":.|."OS_Fil|
|00001540| 65 22 2c 31 37 2c 6b 6b | 24 20 b8 20 52 30 0d 07 |e",17,kk|$ . R0..|
|00001550| 80 18 20 e7 20 52 30 3d | 30 20 f2 64 72 61 67 65 |.. . R0=|0 .drage|
|00001560| 72 72 6f 72 3a e1 0d 07 | 8a 13 20 e7 20 73 61 76 |rror:...|.. . sav|
|00001570| 65 64 5f 6f 6b 3d a3 20 | 8c 0d 07 94 35 20 20 f2 |ed_ok=. |....5  .|
|00001580| 72 6d 28 22 42 55 54 36 | 22 29 3a 62 75 74 31 24 |rm("BUT6|"):but1$|
|00001590| 3d 74 65 78 74 24 3a f2 | 72 6d 28 22 42 55 54 34 |=text$:.|rm("BUT4|
|000015a0| 22 29 3a 62 75 74 32 24 | 3d 74 65 78 74 24 0d 07 |"):but2$|=text$..|
|000015b0| 9e 2b 20 20 f2 72 6d 28 | 22 41 4c 54 31 22 29 3a |.+  .rm(|"ALT1"):|
|000015c0| f2 61 6c 65 72 74 28 74 | 65 78 74 24 2c 62 75 74 |.alert(t|ext$,but|
|000015d0| 31 24 2c 62 75 74 32 24 | 29 0d 07 a8 12 20 20 e7 |1$,but2$|)....  .|
|000015e0| 20 61 6c 65 72 74 3d 30 | 20 3a e1 0d 07 b2 06 20 | alert=0| :..... |
|000015f0| cd 0d 07 bc 28 20 24 6e | 61 6d 65 25 3d 44 4e 24 |....( $n|ame%=DN$|
|00001600| 3a f2 75 70 64 61 74 65 | 5f 74 69 74 6c 65 3a f2 |:.update|_title:.|
|00001610| 6c 6f 61 64 28 44 4e 24 | 29 0d 07 c6 06 20 e1 0d |load(DN$|).... ..|
|00001620| 07 d0 10 20 f4 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 0d |... .---|-------.|
|00001630| 07 da 2d 20 dd f2 64 72 | 61 67 65 72 72 6f 72 3a |..- ..dr|agerror:|
|00001640| f2 72 6d 28 22 45 52 52 | 31 22 29 3a f2 65 72 72 |.rm("ERR|1"):.err|
|00001650| 62 6f 78 28 74 65 78 74 | 24 29 3a e1 0d 07 e4 10 |box(text|$):.....|
|00001660| 20 f4 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 0d 07 ee 14 | .------|----....|
|00001670| 20 dd f2 64 61 74 61 5f | 73 61 76 65 5f 72 65 63 | ..data_|save_rec|
|00001680| 0d 07 f8 11 20 73 63 72 | 61 70 5f 72 65 66 25 3d |.... scr|ap_ref%=|
|00001690| 30 0d 08 02 13 20 c8 8e | 20 62 6c 6f 63 6b 25 21 |0.... ..| block%!|
|000016a0| 34 30 20 ca 0d 08 0c 10 | 20 c9 20 26 46 46 39 2c |40 .....| . &FF9,|
|000016b0| 26 41 46 46 0d 08 16 39 | 20 20 c8 99 22 58 4f 53 |&AFF...9|  .."XOS|
|000016c0| 5f 52 65 61 64 56 61 72 | 56 61 6c 22 2c 22 57 69 |_ReadVar|Val","Wi|
|000016d0| 6d 70 24 53 63 72 61 70 | 22 2c 2c 2d 31 2c 30 2c |mp$Scrap|",,-1,0,|
|000016e0| 33 20 b8 20 2c 2c 65 78 | 69 73 74 73 25 0d 08 20 |3 . ,,ex|ists%.. |
|000016f0| 29 20 20 e7 20 65 78 69 | 73 74 73 25 3d 30 20 8c |)  . exi|sts%=0 .|
|00001700| 20 f2 72 6d 28 22 45 52 | 52 49 22 29 3a 85 20 31 | .rm("ER|RI"):. 1|
|00001710| 2c 74 65 78 74 24 0d 08 | 2a 26 20 20 66 69 6c 65 |,text$..|*&  file|
|00001720| 74 79 70 65 25 3d 62 6c | 6f 63 6b 25 21 34 30 3a |type%=bl|ock%!40:|
|00001730| 44 4e 24 3d 22 22 3a 61 | 25 3d 2d 31 0d 08 34 26 |DN$="":a|%=-1..4&|
|00001740| 20 20 f5 20 61 25 2b 3d | 31 3a 62 25 3d 62 6c 6f |  . a%+=|1:b%=blo|
|00001750| 63 6b 25 3f 28 34 34 2b | 61 25 29 3a fd 20 62 25 |ck%?(44+|a%):. b%|
|00001760| 3d 30 0d 08 3e 28 20 20 | 62 6c 6f 63 6b 25 3f 28 |=0..>(  |block%?(|
|00001770| 34 34 2b 61 25 29 3d 31 | 33 3a 44 4e 24 3d 24 28 |44+a%)=1|3:DN$=$(|
|00001780| 62 6c 6f 63 6b 25 2b 34 | 34 29 0d 08 48 30 20 20 |block%+4|4)..H0  |
|00001790| 62 6c 6f 63 6b 25 21 30 | 3d 36 30 3a 62 6c 6f 63 |block%!0|=60:bloc|
|000017a0| 6b 25 21 31 36 3d 32 3a | 62 6c 6f 63 6b 25 21 31 |k%!16=2:|block%!1|
|000017b0| 32 3d 62 6c 6f 63 6b 25 | 21 38 0d 08 52 31 20 20 |2=block%|!8..R1  |
|000017c0| 24 28 62 6c 6f 63 6b 25 | 2b 34 34 29 3d 22 3c 57 |$(block%|+44)="<W|
|000017d0| 69 6d 70 24 53 63 72 61 | 70 3e 22 2b bd 30 3a 62 |imp$Scra|p>"+.0:b|
|000017e0| 6c 6f 63 6b 25 21 33 36 | 3d 2d 31 0d 08 5c 3a 20 |lock%!36|=-1..\: |
|000017f0| 20 c8 99 22 57 69 6d 70 | 5f 53 65 6e 64 4d 65 73 | .."Wimp|_SendMes|
|00001800| 73 61 67 65 22 2c 31 37 | 2c 62 6c 6f 63 6b 25 2c |sage",17|,block%,|
|00001810| 62 6c 6f 63 6b 25 21 34 | 3a 73 63 72 61 70 5f 72 |block%!4|:scrap_r|
|00001820| 65 66 25 3d 31 0d 08 66 | 06 20 cb 0d 08 70 06 20 |ef%=1..f|. ...p. |
|00001830| e1 0d 08 7a 10 20 f4 2d | 2d 2d 2d 2d 2d 2d 2d 2d |...z. .-|--------|
|00001840| 2d 0d 08 84 0c 20 dd f2 | 6d 6f 75 73 65 0d 08 8e |-.... ..|mouse...|
|00001850| 1b 20 78 25 3d 21 62 6c | 6f 63 6b 25 3a 79 25 3d |. x%=!bl|ock%:y%=|
|00001860| 62 6c 6f 63 6b 25 21 34 | 0d 08 98 0b 20 c8 8e 20 |block%!4|.... .. |
|00001870| b9 20 ca 0d 08 a2 14 20 | 20 c9 20 62 6c 6f 63 6b |. ..... | . block|
|00001880| 25 21 31 32 3d 2d 32 0d | 08 ac 17 20 20 20 e7 20 |%!12=-2.|...   . |
|00001890| 62 6c 6f 63 6b 25 21 38 | 20 80 20 32 20 8c 0d 08 |block%!8| . 2 ...|
|000018a0| b6 31 20 20 20 f2 72 6d | 28 22 4d 55 49 31 22 29 |.1   .rm|("MUI1")|
|000018b0| 3a f2 64 72 61 77 6d 65 | 6e 75 28 6d 65 6e 75 25 |:.drawme|nu(menu%|
|000018c0| 2c 74 65 78 74 24 2c 78 | 25 2c 79 25 2c b9 29 0d |,text$,x|%,y%,.).|
|000018d0| 08 c0 1f 20 20 cc 20 e7 | 20 62 6c 6f 63 6b 25 21 |...  . .| block%!|
|000018e0| 38 20 80 20 35 20 8c 20 | 65 6e 64 25 3d b9 0d 08 |8 . 5 . |end%=...|
|000018f0| ca 07 20 20 cd 0d 08 d4 | 06 20 cb 0d 08 de 06 20 |..  ....|. ..... |
|00001900| e1 0d 08 e8 10 20 f4 2d | 2d 2d 2d 2d 2d 2d 2d 2d |..... .-|--------|
|00001910| 2d 0d 08 f2 10 20 dd f2 | 65 64 69 74 6d 6f 75 73 |-.... ..|editmous|
|00001920| 65 0d 08 fc 48 20 78 70 | 6f 73 3d 21 62 6c 6f 63 |e...H xp|os=!bloc|
|00001930| 6b 25 3a 79 70 6f 73 3d | 62 6c 6f 63 6b 25 21 34 |k%:ypos=|block%!4|
|00001940| 3a 62 75 3d 62 6c 6f 63 | 6b 25 21 38 3a 77 69 6e |:bu=bloc|k%!8:win|
|00001950| 64 25 3d 62 6c 6f 63 6b | 25 21 31 32 3a 69 63 3d |d%=block|%!12:ic=|
|00001960| 62 6c 6f 63 6b 25 21 31 | 36 0d 09 06 0b 20 4d 55 |block%!1|6.... MU|
|00001970| 24 3d 22 22 0d 09 10 18 | 20 e7 20 77 69 6e 64 25 |$=""....| . wind%|
|00001980| 3d 2d 32 20 80 20 62 75 | 3d 32 20 8c 0d 09 1a 11 |=-2 . bu|=2 .....|
|00001990| 20 20 f2 72 6d 28 22 4d | 55 49 31 22 29 0d 09 24 |  .rm("M|UI1")..$|
|000019a0| 35 20 20 f2 64 72 61 77 | 6d 65 6e 75 28 6d 65 6e |5  .draw|menu(men|
|000019b0| 75 25 2c 74 65 78 74 24 | 2c 78 70 6f 73 2c 79 70 |u%,text$|,xpos,yp|
|000019c0| 6f 73 2c b9 29 3a 4d 55 | 24 3d 22 69 63 6f 6e 22 |os,.):MU|$="icon"|
|000019d0| 3a e1 0d 09 2e 06 20 cd | 0d 09 38 0f 20 c8 8e 20 |:..... .|..8. .. |
|000019e0| 77 69 6e 64 25 20 ca 0d | 09 42 25 20 f4 20 20 20 |wind% ..|.B% .   |
|000019f0| 20 20 20 20 20 20 20 2a | 2a 2a 2a 20 4d 61 69 6e |       *|*** Main|
|00001a00| 20 57 69 6e 64 6f 77 20 | 2a 2a 2a 2a 0d 09 4c 10 | Window |****..L.|
|00001a10| 20 c9 20 77 68 61 6e 64 | 6c 65 31 25 0d 09 56 34 | . whand|le1%..V4|
|00001a20| 20 62 6c 6f 63 6b 25 21 | 30 3d 77 68 61 6e 64 6c | block%!|0=whandl|
|00001a30| 65 38 25 3a c8 99 22 57 | 69 6d 70 5f 43 6c 6f 73 |e8%:.."W|imp_Clos|
|00001a40| 65 57 69 6e 64 6f 77 22 | 2c 2c 62 6c 6f 63 6b 25 |eWindow"|,,block%|
|00001a50| 0d 09 60 36 20 73 61 76 | 65 5f 64 69 61 3d 30 3a |..`6 sav|e_dia=0:|
|00001a60| c8 99 22 57 69 6d 70 5f | 53 65 74 43 61 72 65 74 |.."Wimp_|SetCaret|
|00001a70| 50 6f 73 69 74 69 6f 6e | 22 2c 77 68 61 6e 64 6c |Position|",whandl|
|00001a80| 65 31 25 2c 2d 31 0d 09 | 6a 14 20 e7 20 62 75 3d |e1%,-1..|j. . bu=|
|00001a90| 32 20 80 20 69 63 3c 30 | 20 8c 0d 09 74 2d 20 20 |2 . ic<0| ...t-  |
|00001aa0| f2 6d 61 69 6e 6d 65 6e | 75 28 6d 6d 65 6e 75 25 |.mainmen|u(mmenu%|
|00001ab0| 29 3a 78 6d 65 6e 75 3d | 78 70 6f 73 3a 79 6d 65 |):xmenu=|xpos:yme|
|00001ac0| 6e 75 3d 79 70 6f 73 0d | 09 7e 3f 20 20 c8 99 22 |nu=ypos.|.~?  .."|
|00001ad0| 57 69 6d 70 5f 43 72 65 | 61 74 65 4d 65 6e 75 22 |Wimp_Cre|ateMenu"|
|00001ae0| 2c 2c 6d 6d 65 6e 75 25 | 2c 78 70 6f 73 2d 35 31 |,,mmenu%|,xpos-51|
|00001af0| 2c 79 70 6f 73 3a 4d 55 | 24 3d 22 6d 61 69 6e 6d |,ypos:MU|$="mainm|
|00001b00| 65 6e 75 22 3a e1 0d 09 | 88 06 20 cd 0d 09 92 2b |enu":...|.. ....+|
|00001b10| 20 c8 99 22 57 69 6d 70 | 5f 53 65 74 43 61 72 65 | .."Wimp|_SetCare|
|00001b20| 74 50 6f 73 69 74 69 6f | 6e 22 2c 77 68 61 6e 64 |tPositio|n",whand|
|00001b30| 6c 65 31 25 2c 2d 31 0d | 09 9c 37 20 62 6c 6f 63 |le1%,-1.|..7 bloc|
|00001b40| 6b 25 21 30 3d 77 68 61 | 6e 64 6c 65 31 25 3a c8 |k%!0=wha|ndle1%:.|
|00001b50| 99 22 57 69 6d 70 5f 47 | 65 74 57 69 6e 64 6f 77 |."Wimp_G|etWindow|
|00001b60| 53 74 61 74 65 22 2c 2c | 62 6c 6f 63 6b 25 0d 09 |State",,|block%..|
|00001b70| a6 1f 20 f2 67 65 74 6f | 72 69 67 69 6e 28 62 6c |.. .geto|rigin(bl|
|00001b80| 6f 63 6b 25 2c 78 30 25 | 2c 79 30 25 29 0d 09 b0 |ock%,x0%|,y0%)...|
|00001b90| 26 20 f4 20 20 20 20 20 | 20 20 20 20 20 2a 2a 2a |& .     |     ***|
|00001ba0| 20 4f 74 68 65 72 20 77 | 69 6e 64 6f 77 73 20 2a | Other w|indows *|
|00001bb0| 2a 2a 2a 0d 09 ba 11 20 | c9 20 74 6f 6f 6c 73 5f |***.... |. tools_|
|00001bc0| 77 69 6e 25 0d 09 c4 1c | 20 e7 20 69 63 3d 38 20 |win%....| . ic=8 |
|00001bd0| f2 6f 70 65 6e 5f 67 72 | 69 64 73 69 7a 65 3a e1 |.open_gr|idsize:.|
|00001be0| 0d 09 ce 18 20 e7 20 69 | 63 3d 39 20 f2 6f 70 65 |.... . i|c=9 .ope|
|00001bf0| 6e 5f 66 6f 6e 74 3a e1 | 0d 09 d8 1a 20 e7 20 69 |n_font:.|.... . i|
|00001c00| 63 3d 31 34 20 f2 6f 70 | 65 6e 5f 70 72 69 6e 74 |c=14 .op|en_print|
|00001c10| 3a e1 0d 09 e2 17 20 e7 | 20 69 63 3d 31 32 20 f2 |:..... .| ic=12 .|
|00001c20| 72 65 73 65 74 69 74 3a | e1 0d 09 ec 19 20 e7 20 |resetit:|..... . |
|00001c30| 69 63 3d 31 33 20 f2 6f | 70 65 6e 5f 73 61 76 65 |ic=13 .o|pen_save|
|00001c40| 3a e1 0d 09 f6 18 20 e7 | 20 69 63 3d 31 35 20 f2 |:..... .| ic=15 .|
|00001c50| 73 65 74 75 70 5f 70 61 | 74 68 0d 0a 00 13 20 e7 |setup_pa|th.... .|
|00001c60| 20 69 63 3d 31 31 20 f2 | 72 65 67 65 6e 0d 0a 0a | ic=11 .|regen...|
|00001c70| 1e 20 e7 20 69 63 3d 31 | 30 20 f2 6f 70 65 6e 5f |. . ic=1|0 .open_|
|00001c80| 62 6f 72 64 65 72 73 6d | 65 6e 75 0d 0a 14 10 20 |bordersm|enu.... |
|00001c90| c9 20 66 6f 6e 74 5f 77 | 69 6e 25 0d 0a 1e 16 20 |. font_w|in%.... |
|00001ca0| e7 20 69 63 3d 36 20 f2 | 73 65 6c 5f 74 69 74 6c |. ic=6 .|sel_titl|
|00001cb0| 65 0d 0a 28 15 20 e7 20 | 69 63 3d 37 20 f2 73 65 |e..(. . |ic=7 .se|
|00001cc0| 6c 5f 74 65 78 74 0d 0a | 32 15 20 e7 20 69 63 3d |l_text..|2. . ic=|
|00001cd0| 38 20 f2 73 65 6c 5f 67 | 72 69 64 0d 0a 3c 15 20 |8 .sel_g|rid..<. |
|00001ce0| e7 20 69 63 3d 31 33 20 | f2 73 65 6c 5f 74 72 79 |. ic=13 |.sel_try|
|00001cf0| 0d 0a 46 0e 20 e7 20 69 | 63 3d 31 30 20 8c 0d 0a |..F. . i|c=10 ...|
|00001d00| 50 16 20 20 f2 7a 32 28 | 39 2c 66 6f 6e 74 5f 77 |P.  .z2(|9,font_w|
|00001d10| 69 6e 25 29 0d 0a 5a 3d | 20 20 e7 20 62 75 3c 3e |in%)..Z=|  . bu<>|
|00001d20| 31 20 62 6c 6f 63 6b 25 | 21 30 3d 66 6f 6e 74 5f |1 block%|!0=font_|
|00001d30| 77 69 6e 25 3a c8 99 22 | 57 69 6d 70 5f 43 6c 6f |win%:.."|Wimp_Clo|
|00001d40| 73 65 57 69 6e 64 6f 77 | 22 2c 2c 62 6c 6f 63 6b |seWindow|",,block|
|00001d50| 25 0d 0a 64 37 20 20 c8 | 99 22 57 69 6d 70 5f 53 |%..d7  .|."Wimp_S|
|00001d60| 65 74 43 61 72 65 74 50 | 6f 73 69 74 69 6f 6e 22 |etCaretP|osition"|
|00001d70| 2c 77 68 61 6e 64 6c 65 | 31 25 2c 2d 31 3a f2 6d |,whandle|1%,-1:.m|
|00001d80| 69 6e 69 5f 70 6f 6c 6c | 0d 0a 6e 40 20 20 f2 73 |ini_poll|..n@  .s|
|00001d90| 74 79 6c 65 31 28 31 2c | 30 2c 30 29 3a c8 99 22 |tyle1(1,|0,0):.."|
|00001da0| 57 69 6d 70 5f 46 6f 72 | 63 65 52 65 64 72 61 77 |Wimp_For|ceRedraw|
|00001db0| 22 2c 77 68 61 6e 64 6c | 65 31 25 2c 30 2c 2d 38 |",whandl|e1%,0,-8|
|00001dc0| 37 32 2c 36 31 36 2c 30 | 0d 0a 78 10 20 20 73 61 |72,616,0|..x.  sa|
|00001dd0| 76 65 64 5f 6f 6b 3d a3 | 0d 0a 82 06 20 cd 0d 0a |ved_ok=.|.... ...|
|00001de0| 8c 0e 20 e7 20 69 63 3d | 31 32 20 8c 0d 0a 96 17 |.. . ic=|12 .....|
|00001df0| 20 20 f2 7a 31 28 31 31 | 2c 66 6f 6e 74 5f 77 69 |  .z1(11|,font_wi|
|00001e00| 6e 25 29 0d 0a a0 33 20 | 20 f2 69 73 65 74 28 30 |n%)...3 | .iset(0|
|00001e10| 2c 66 6f 6e 74 73 24 28 | 6f 74 74 29 2c 66 6f 6e |,fonts$(|ott),fon|
|00001e20| 74 5f 77 69 6e 25 29 3a | 74 69 74 6c 65 5f 66 6f |t_win%):|title_fo|
|00001e30| 6e 74 3d 6f 74 74 0d 0a | aa 32 20 20 f2 69 73 65 |nt=ott..|.2  .ise|
|00001e40| 74 28 33 2c 66 6f 6e 74 | 73 24 28 6f 74 66 29 2c |t(3,font|s$(otf),|
|00001e50| 66 6f 6e 74 5f 77 69 6e | 25 29 3a 74 65 78 74 5f |font_win|%):text_|
|00001e60| 66 6f 6e 74 3d 6f 74 66 | 0d 0a b4 32 20 20 f2 69 |font=otf|...2  .i|
|00001e70| 73 65 74 28 34 2c 66 6f | 6e 74 73 24 28 6f 67 66 |set(4,fo|nts$(ogf|
|00001e80| 29 2c 66 6f 6e 74 5f 77 | 69 6e 25 29 3a 67 72 69 |),font_w|in%):gri|
|00001e90| 64 5f 66 6f 6e 74 3d 6f | 67 66 0d 0a be 35 20 20 |d_font=o|gf...5  |
|00001ea0| 62 6c 6f 63 6b 25 21 30 | 3d 66 6f 6e 74 5f 77 69 |block%!0|=font_wi|
|00001eb0| 6e 25 3a c8 99 22 57 69 | 6d 70 5f 43 6c 6f 73 65 |n%:.."Wi|mp_Close|
|00001ec0| 57 69 6e 64 6f 77 22 2c | 2c 62 6c 6f 63 6b 25 0d |Window",|,block%.|
|00001ed0| 0a c8 2c 20 20 c8 99 22 | 57 69 6d 70 5f 53 65 74 |..,  .."|Wimp_Set|
|00001ee0| 43 61 72 65 74 50 6f 73 | 69 74 69 6f 6e 22 2c 77 |CaretPos|ition",w|
|00001ef0| 68 61 6e 64 6c 65 31 25 | 2c 2d 31 0d 0a d2 06 20 |handle1%|,-1.... |
|00001f00| cd 0d 0a dc 04 0d 0a e6 | 11 20 c9 20 67 72 69 64 |........|. . grid|
|00001f10| 5f 73 69 7a 65 25 0d 0a | f0 0d 20 e7 20 69 63 3d |_size%..|.. . ic=|
|00001f20| 37 20 8c 0d 0a fa 17 20 | 20 f2 7a 32 28 32 2c 67 |7 ..... | .z2(2,g|
|00001f30| 72 69 64 5f 73 69 7a 65 | 25 29 0d 0b 04 6e 20 20 |rid_size|%)...n  |
|00001f40| e7 20 62 75 3c 3e 31 20 | 62 6c 6f 63 6b 25 21 30 |. bu<>1 |block%!0|
|00001f50| 3d 67 72 69 64 5f 73 69 | 7a 65 25 3a c8 99 22 57 |=grid_si|ze%:.."W|
|00001f60| 69 6d 70 5f 43 6c 6f 73 | 65 57 69 6e 64 6f 77 22 |imp_Clos|eWindow"|
|00001f70| 2c 2c 62 6c 6f 63 6b 25 | 3a 62 6c 6f 63 6b 25 21 |,,block%|:block%!|
|00001f80| 30 3d 6c 69 73 74 5f 77 | 69 6e 25 3a c8 99 22 57 |0=list_w|in%:.."W|
|00001f90| 69 6d 70 5f 43 6c 6f 73 | 65 57 69 6e 64 6f 77 22 |imp_Clos|eWindow"|
|00001fa0| 2c 2c 62 6c 6f 63 6b 25 | 0d 0b 0e 31 20 20 f2 6d |,,block%|...1  .m|
|00001fb0| 69 6e 69 5f 70 6f 6c 6c | 3a f2 69 72 65 61 64 28 |ini_poll|:.iread(|
|00001fc0| 31 2c 67 72 69 64 5f 73 | 69 7a 65 25 29 3a 52 4f |1,grid_s|ize%):RO|
|00001fd0| 57 53 25 3d bb 28 61 24 | 29 0d 0b 18 26 20 20 f2 |WS%=.(a$|)...&  .|
|00001fe0| 69 72 65 61 64 28 31 2c | 67 72 69 64 5f 73 69 7a |iread(1,|grid_siz|
|00001ff0| 65 25 29 3a 43 4f 4c 53 | 25 3d bb 28 61 24 29 0d |e%):COLS|%=.(a$).|
|00002000| 0b 22 24 20 20 e7 20 52 | 4f 57 53 25 3c 35 20 84 |."$  . R|OWS%<5 .|
|00002010| 20 43 4f 4c 53 25 3c 35 | 20 f2 74 6f 6f 5f 73 6d | COLS%<5| .too_sm|
|00002020| 61 6c 6c 0d 0b 2c 24 20 | 20 e7 20 52 4f 57 53 25 |all..,$ | . ROWS%|
|00002030| 3e 32 30 20 84 20 43 4f | 4c 53 25 3e 32 30 20 f2 |>20 . CO|LS%>20 .|
|00002040| 74 6f 6f 5f 62 69 67 0d | 0b 36 31 20 20 f2 63 72 |too_big.|.61  .cr|
|00002050| 65 61 74 65 5f 67 72 69 | 64 3a f2 69 72 65 61 64 |eate_gri|d:.iread|
|00002060| 28 33 2c 67 72 69 64 5f | 73 69 7a 65 25 29 3a 54 |(3,grid_|size%):T|
|00002070| 69 74 6c 65 24 3d 61 24 | 0d 0b 40 1f 20 20 73 61 |itle$=a$|..@.  sa|
|00002080| 76 65 64 5f 6f 6b 3d a3 | 3a f2 73 74 79 6c 65 31 |ved_ok=.|:.style1|
|00002090| 28 31 2c 30 2c 30 29 0d | 0b 4a 31 20 20 c8 99 22 |(1,0,0).|.J1  .."|
|000020a0| 57 69 6d 70 5f 46 6f 72 | 63 65 52 65 64 72 61 77 |Wimp_For|ceRedraw|
|000020b0| 22 2c 77 68 61 6e 64 6c | 65 31 25 2c 30 2c 2d 38 |",whandl|e1%,0,-8|
|000020c0| 37 32 2c 36 31 36 2c 30 | 0d 0b 54 06 20 cd 0d 0b |72,616,0|..T. ...|
|000020d0| 5e 0d 20 e7 20 69 63 3d | 39 20 8c 0d 0b 68 17 20 |^. . ic=|9 ...h. |
|000020e0| 20 f2 7a 31 28 38 2c 67 | 72 69 64 5f 73 69 7a 65 | .z1(8,g|rid_size|
|000020f0| 25 29 0d 0b 72 66 20 20 | 62 6c 6f 63 6b 25 21 30 |%)..rf  |block%!0|
|00002100| 3d 67 72 69 64 5f 73 69 | 7a 65 25 3a c8 99 22 57 |=grid_si|ze%:.."W|
|00002110| 69 6d 70 5f 43 6c 6f 73 | 65 57 69 6e 64 6f 77 22 |imp_Clos|eWindow"|
|00002120| 2c 2c 62 6c 6f 63 6b 25 | 3a 62 6c 6f 63 6b 25 21 |,,block%|:block%!|
|00002130| 30 3d 6c 69 73 74 5f 77 | 69 6e 25 3a c8 99 22 57 |0=list_w|in%:.."W|
|00002140| 69 6d 70 5f 43 6c 6f 73 | 65 57 69 6e 64 6f 77 22 |imp_Clos|eWindow"|
|00002150| 2c 2c 62 6c 6f 63 6b 25 | 0d 0b 7c 06 20 cd 0d 0b |,,block%|..|. ...|
|00002160| 86 14 20 e7 20 69 63 3d | 35 20 84 20 69 63 3d 36 |.. . ic=|5 . ic=6|
|00002170| 20 8c 0d 0b 90 19 20 20 | 62 6c 61 63 6b 5f 62 6b | .....  |black_bk|
|00002180| 3d ac 20 62 6c 61 63 6b | 5f 62 6b 0d 0b 9a 4d 20 |=. black|_bk...M |
|00002190| 20 e7 20 62 6c 61 63 6b | 5f 62 6b 3d b9 20 f2 69 | . black|_bk=. .i|
|000021a0| 73 65 74 28 36 2c 22 6f | 70 74 6f 6e 22 2c 67 72 |set(6,"o|pton",gr|
|000021b0| 69 64 5f 73 69 7a 65 25 | 29 20 8b 20 f2 69 73 65 |id_size%|) . .ise|
|000021c0| 74 28 36 2c 22 6f 70 74 | 6f 66 66 22 2c 67 72 69 |t(6,"opt|off",gri|
|000021d0| 64 5f 73 69 7a 65 25 29 | 0d 0b a4 06 20 cd 0d 0b |d_size%)|.... ...|
|000021e0| a5 1c 20 e7 20 69 63 3d | 31 31 20 f2 63 6c 69 63 |.. . ic=|11 .clic|
|000021f0| 6b 5f 63 6f 6c 6f 75 72 | 3a e1 0d 0b ae 04 0d 0b |k_colour|:.......|
|00002200| b8 20 20 c9 20 77 68 61 | 6e 64 6c 65 38 25 3a f2 |.  . wha|ndle8%:.|
|00002210| 63 6c 69 63 6b 5f 64 72 | 61 67 73 61 76 65 0d 0b |click_dr|agsave..|
|00002220| c2 20 20 c9 20 77 68 61 | 6e 64 6c 65 31 31 25 3a |.  . wha|ndle11%:|
|00002230| f2 63 6c 69 63 6b 5f 73 | 65 74 70 61 74 68 0d 0b |.click_s|etpath..|
|00002240| e0 26 20 c9 20 77 68 61 | 6e 64 6c 65 31 34 25 3a |.& . wha|ndle14%:|
|00002250| f2 63 6c 69 63 6b 5f 70 | 72 69 6e 74 64 69 61 6c |.click_p|rintdial|
|00002260| 6f 67 75 65 0d 0b e1 10 | 20 c9 20 6c 69 73 74 5f |ogue....| . list_|
|00002270| 77 69 6e 25 0d 0b e2 2d | 20 20 e7 20 69 63 3e 32 |win%...-|  . ic>2|
|00002280| 34 20 80 20 69 63 3c 34 | 39 20 f2 63 61 72 65 74 |4 . ic<4|9 .caret|
|00002290| 28 69 63 2d 32 35 2c 6c | 69 73 74 5f 77 69 6e 25 |(ic-25,l|ist_win%|
|000022a0| 29 0d 0b e3 22 20 20 e7 | 20 69 63 3d 32 34 20 f2 |)..."  .| ic=24 .|
|000022b0| 63 61 72 65 74 28 37 32 | 2c 6c 69 73 74 5f 77 69 |caret(72|,list_wi|
|000022c0| 6e 25 29 0d 0b e4 2d 20 | 20 e7 20 69 63 3e 34 38 |n%)...- | . ic>48|
|000022d0| 20 80 20 69 63 3c 37 32 | 20 f2 63 61 72 65 74 28 | . ic<72| .caret(|
|000022e0| 69 63 2b 32 34 2c 6c 69 | 73 74 5f 77 69 6e 25 29 |ic+24,li|st_win%)|
|000022f0| 0d 0b ea 04 0d 0b f4 06 | 20 cb 0d 0b fe 06 20 e1 |........| ..... .|
|00002300| 0d 0c 08 10 20 f4 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.... .--|--------|
|00002310| 0d 0c 12 14 20 dd f2 63 | 61 72 65 74 28 43 25 2c |.... ..c|aret(C%,|
|00002320| 77 68 25 29 0d 0c 1c 2c | 20 f2 69 72 65 61 64 28 |wh%)...,| .iread(|
|00002330| 43 25 2c 77 68 25 29 3a | e7 20 61 24 3d 22 22 20 |C%,wh%):|. a$="" |
|00002340| 77 77 68 3d 2d 31 20 8b | 20 77 77 68 3d a9 61 24 |wwh=-1 .| wwh=.a$|
|00002350| 0d 0c 26 2f 20 c8 99 22 | 57 69 6d 70 5f 53 65 74 |..&/ .."|Wimp_Set|
|00002360| 43 61 72 65 74 50 6f 73 | 69 74 69 6f 6e 22 2c 77 |CaretPos|ition",w|
|00002370| 68 25 2c 43 25 2c 30 2c | 2c 2d 31 2c 77 77 68 0d |h%,C%,0,|,-1,wwh.|
|00002380| 0c 30 06 20 e1 0d 0c 3a | 10 20 f4 2d 2d 2d 2d 2d |.0. ...:|. .-----|
|00002390| 2d 2d 2d 2d 2d 0d 0c 44 | 28 20 dd f2 70 69 63 74 |-----..D|( ..pict|
|000023a0| 75 72 65 28 58 53 49 5a | 45 2c 59 53 49 5a 45 2c |ure(XSIZ|E,YSIZE,|
|000023b0| 73 73 73 70 61 63 65 2c | 73 73 73 24 29 0d 0c 4e |ssspace,|sss$)..N|
|000023c0| 08 20 ea 20 85 0d 0c 58 | 25 20 ee 20 85 20 ea 3a |. . ...X|% . . .:|
|000023d0| f7 20 85 3a ef 32 36 3a | db 3a f1 f6 24 3a f1 c3 |. .:.26:|.:..$:..|
|000023e0| 9e 3a 5a 24 3d be 3a fa | 3a e1 0d 0c 62 13 20 24 |.:Z$=.:.|:...b. $|
|000023f0| 73 70 72 6e 61 6d 65 25 | 3d 73 73 73 24 0d 0c 6c |sprname%|=sss$..l|
|00002400| 10 20 e7 20 73 73 73 24 | 3d 22 22 20 8c 0d 0c 76 |. . sss$|="" ...v|
|00002410| 37 20 20 c8 99 22 4f 53 | 5f 53 70 72 69 74 65 4f |7  .."OS|_SpriteO|
|00002420| 70 22 2c 32 36 39 2c 73 | 73 73 70 61 63 65 2c 73 |p",269,s|sspace,s|
|00002430| 70 72 6e 61 6d 65 25 2c | 31 33 2c 31 20 b8 20 2c |prname%,|13,1 . ,|
|00002440| 2c 2c 52 33 0d 0c 80 17 | 20 20 3f 28 73 70 72 6e |,,R3....|  ?(sprn|
|00002450| 61 6d 65 25 2b 52 33 29 | 3d 31 33 0d 0c 8a 06 20 |ame%+R3)|=13.... |
|00002460| cd 0d 0c 94 33 20 c8 99 | 22 4f 53 5f 53 70 72 69 |....3 ..|"OS_Spri|
|00002470| 74 65 4f 70 22 2c 32 38 | 30 2c 73 73 73 70 61 63 |teOp",28|0,ssspac|
|00002480| 65 2c 24 73 70 72 6e 61 | 6d 65 25 20 b8 20 2c 2c |e,$sprna|me% . ,,|
|00002490| 61 64 64 25 0d 0c 9e 3a | 20 c8 99 22 4f 53 5f 53 |add%...:| .."OS_S|
|000024a0| 70 72 69 74 65 4f 70 22 | 2c 35 35 32 2c 73 73 73 |priteOp"|,552,sss|
|000024b0| 70 61 63 65 2c 61 64 64 | 25 20 b8 20 2c 2c 2c 73 |pace,add|% . ,,,s|
|000024c0| 78 25 2c 73 79 25 2c 2c | 73 6d 6f 64 65 25 0d 0c |x%,sy%,,|smode%..|
|000024d0| a8 24 20 65 25 3d 28 61 | 64 64 25 21 33 32 2d 34 |.$ e%=(a|dd%!32-4|
|000024e0| 34 29 2f 38 3a 70 61 6c | 25 3d 70 61 6c 62 75 66 |4)/8:pal|%=palbuf|
|000024f0| 66 25 0d 0c b2 0c 20 c8 | 8e 20 65 25 20 ca 0d 0c |f%.... .|. e% ...|
|00002500| bc 09 20 20 c9 20 30 0d | 0c c6 2e 20 20 c8 99 22 |..  . 0.|...  .."|
|00002510| 4f 53 5f 52 65 61 64 4d | 6f 64 65 56 61 72 69 61 |OS_ReadM|odeVaria|
|00002520| 62 6c 65 22 2c 73 6d 6f | 64 65 25 2c 39 20 b8 20 |ble",smo|de%,9 . |
|00002530| 2c 2c 70 70 25 0d 0c d0 | 0e 20 20 c8 8e 20 70 70 |,,pp%...|.  .. pp|
|00002540| 25 20 ca 0d 0c da 13 20 | 20 20 c9 20 30 3a 70 61 |% ..... |  . 0:pa|
|00002550| 6c 25 3d 70 30 25 0d 0c | e4 13 20 20 20 c9 20 31 |l%=p0%..|..   . 1|
|00002560| 3a 70 61 6c 25 3d 70 31 | 25 0d 0c ee 13 20 20 20 |:pal%=p1|%....   |
|00002570| c9 20 32 3a 70 61 6c 25 | 3d 70 32 25 0d 0c f8 13 |. 2:pal%|=p2%....|
|00002580| 20 20 20 c9 20 33 3a 70 | 61 6c 25 3d 70 33 25 0d |   . 3:p|al%=p3%.|
|00002590| 0d 02 06 20 cb 0d 0d 0c | 04 0d 0d 16 0d 20 c9 20 |... ....|..... . |
|000025a0| 32 2c 34 2c 31 36 0d 0d | 20 13 20 20 e3 20 69 25 |2,4,16..| .  . i%|
|000025b0| 3d 30 20 b8 20 65 25 2d | 31 0d 0d 2a 20 20 20 70 |=0 . e%-|1..*   p|
|000025c0| 61 6c 25 21 28 69 25 2a | 34 29 3d 61 64 64 25 21 |al%!(i%*|4)=add%!|
|000025d0| 28 34 34 2b 69 25 2a 38 | 29 0d 0d 34 0a 20 20 ed |(44+i%*8|)..4.  .|
|000025e0| 20 69 25 0d 0d 3e 09 20 | c9 20 36 34 0d 0d 48 3e | i%..>. |. 64..H>|
|000025f0| 20 20 e3 20 67 72 61 62 | 25 3d 30 20 b8 20 32 30 |  . grab|%=0 . 20|
|00002600| 34 38 2d 38 20 88 20 38 | 3a 70 61 6c 25 21 28 67 |48-8 . 8|:pal%!(g|
|00002610| 72 61 62 25 3e 3e 31 29 | 3d 61 64 64 25 21 28 67 |rab%>>1)|=add%!(g|
|00002620| 72 61 62 25 2b 34 34 29 | 3a ed 0d 0d 52 06 20 cb |rab%+44)|:...R. .|
|00002630| 0d 0d 5c 12 20 e7 20 73 | 6d 6f 64 65 25 3d 2d 31 |..\. . s|mode%=-1|
|00002640| 20 e1 0d 0d 66 42 20 e7 | 20 65 25 3c 36 34 20 c8 | ...fB .| e%<64 .|
|00002650| 99 22 43 6f 6c 6f 75 72 | 54 72 61 6e 73 5f 53 65 |."Colour|Trans_Se|
|00002660| 6c 65 63 74 54 61 62 6c | 65 22 2c 73 6d 6f 64 65 |lectTabl|e",smode|
|00002670| 25 2c 70 61 6c 25 2c 2d | 31 2c 2d 31 2c 74 72 61 |%,pal%,-|1,-1,tra|
|00002680| 6e 73 32 25 0d 0d 70 0e | 20 e7 20 65 25 3e 36 33 |ns2%..p.| . e%>63|
|00002690| 20 8c 0d 0d 7a 22 20 20 | e3 20 51 25 3d 30 20 b8 | ...z"  |. Q%=0 .|
|000026a0| 20 32 35 35 3a 74 72 61 | 6e 73 32 25 3f 51 25 3d | 255:tra|ns2%?Q%=|
|000026b0| 51 25 3a ed 0d 0d 84 12 | 20 20 e3 20 51 25 3d 30 |Q%:.....|  . Q%=0|
|000026c0| 20 b8 20 32 35 35 0d 0d | 8e 42 20 20 c8 99 22 43 | . 255..|.B  .."C|
|000026d0| 6f 6c 6f 75 72 54 72 61 | 6e 73 5f 52 65 74 75 72 |olourTra|ns_Retur|
|000026e0| 6e 43 6f 6c 6f 75 72 4e | 75 6d 62 65 72 22 2c 70 |nColourN|umber",p|
|000026f0| 61 6c 25 21 28 51 25 3c | 3c 32 29 20 b8 20 74 72 |al%!(Q%<|<2) . tr|
|00002700| 61 6e 73 32 25 3f 51 25 | 0d 0d 98 07 20 20 ed 0d |ans2%?Q%|....  ..|
|00002710| 0d a2 3b 20 20 c8 99 22 | 43 6f 6c 6f 75 72 54 72 |..;  .."|ColourTr|
|00002720| 61 6e 73 5f 53 65 6c 65 | 63 74 54 61 62 6c 65 22 |ans_Sele|ctTable"|
|00002730| 2c 73 6d 6f 64 65 25 2c | 70 61 6c 25 2c 2d 31 2c |,smode%,|pal%,-1,|
|00002740| 2d 31 2c 74 72 61 6e 73 | 32 25 0d 0d ac 06 20 cd |-1,trans|2%.... .|
|00002750| 0d 0d b6 04 0d 0d c0 2e | 20 c8 99 22 4f 53 5f 52 |........| .."OS_R|
|00002760| 65 61 64 4d 6f 64 65 56 | 61 72 69 61 62 6c 65 22 |eadModeV|ariable"|
|00002770| 2c 73 6d 6f 64 65 25 2c | 34 20 b8 20 2c 2c 78 6d |,smode%,|4 . ,,xm|
|00002780| 61 67 0d 0d ca 2e 20 c8 | 99 22 4f 53 5f 52 65 61 |ag.... .|."OS_Rea|
|00002790| 64 4d 6f 64 65 56 61 72 | 69 61 62 6c 65 22 2c 73 |dModeVar|iable",s|
|000027a0| 6d 6f 64 65 25 2c 35 20 | b8 20 2c 2c 79 6d 61 67 |mode%,5 |. ,,ymag|
|000027b0| 0d 0d d4 24 20 73 78 25 | 3d 28 73 78 25 3c 3c 78 |...$ sx%|=(sx%<<x|
|000027c0| 6d 61 67 29 3a 73 79 25 | 3d 28 73 79 25 3c 3c 79 |mag):sy%|=(sy%<<y|
|000027d0| 6d 61 67 29 0d 0d de 2b | 20 c8 99 22 4f 53 5f 52 |mag)...+| .."OS_R|
|000027e0| 65 61 64 4d 6f 64 65 56 | 61 72 69 61 62 6c 65 22 |eadModeV|ariable"|
|000027f0| 2c 2d 31 2c 35 20 b8 20 | 2c 2c 79 6d 61 67 32 0d |,-1,5 . |,,ymag2.|
|00002800| 0d e8 2b 20 c8 99 22 4f | 53 5f 52 65 61 64 4d 6f |..+ .."O|S_ReadMo|
|00002810| 64 65 56 61 72 69 61 62 | 6c 65 22 2c 2d 31 2c 34 |deVariab|le",-1,4|
|00002820| 20 b8 20 2c 2c 78 6d 61 | 67 32 0d 0d f2 2e 20 e7 | . ,,xma|g2.... .|
|00002830| 20 70 72 6e 74 5f 73 74 | 61 74 75 73 3d 31 20 78 | prnt_st|atus=1 x|
|00002840| 6d 61 67 32 3d 78 73 74 | 69 6e 74 3a 79 6d 61 67 |mag2=xst|int:ymag|
|00002850| 32 3d 79 73 74 69 6e 74 | 0d 0d fc 04 0d 0e 06 31 |2=ystint|.......1|
|00002860| 20 66 61 3d 28 32 5e 79 | 6d 61 67 32 29 2f 28 32 | fa=(2^y|mag2)/(2|
|00002870| 5e 79 6d 61 67 29 3a 66 | 61 32 3d 28 32 5e 78 6d |^ymag):f|a2=(2^xm|
|00002880| 61 67 32 29 2f 28 32 5e | 78 6d 61 67 29 0d 0e 10 |ag2)/(2^|xmag)...|
|00002890| 26 20 72 61 74 69 6f 78 | 3d 58 53 49 5a 45 2f 73 |& ratiox|=XSIZE/s|
|000028a0| 78 25 3a 72 61 74 69 6f | 79 3d 59 53 49 5a 45 2f |x%:ratio|y=YSIZE/|
|000028b0| 73 79 25 0d 0e 1a 3e 20 | e7 20 72 61 74 69 6f 78 |sy%...> |. ratiox|
|000028c0| 3c 72 61 74 69 6f 79 20 | 73 66 6e 25 3d 58 53 49 |<ratioy |sfn%=XSI|
|000028d0| 5a 45 3a 73 66 64 25 3d | 73 78 25 20 8b 20 73 66 |ZE:sfd%=|sx% . sf|
|000028e0| 6e 25 3d 59 53 49 5a 45 | 3a 73 66 64 25 3d 73 79 |n%=YSIZE|:sfd%=sy|
|000028f0| 25 0d 0e 24 3b 20 21 6d | 61 67 25 3d 73 66 6e 25 |%..$; !m|ag%=sfn%|
|00002900| 3a 6d 61 67 25 21 34 3d | 73 66 6e 25 3a 6d 61 67 |:mag%!4=|sfn%:mag|
|00002910| 25 21 38 3d 73 66 64 25 | 2a 66 61 32 3a 6d 61 67 |%!8=sfd%|*fa2:mag|
|00002920| 25 21 31 32 3d 73 66 64 | 25 2a 66 61 0d 0e 2e 2c |%!12=sfd|%*fa...,|
|00002930| 20 73 78 25 3d 73 78 25 | 2a 28 73 66 6e 25 2f 73 | sx%=sx%|*(sfn%/s|
|00002940| 66 64 25 29 3a 73 79 25 | 3d 73 79 25 2a 28 73 66 |fd%):sy%|=sy%*(sf|
|00002950| 6e 25 2f 73 66 64 25 29 | 0d 0e 38 1a 20 78 73 69 |n%/sfd%)|..8. xsi|
|00002960| 7a 65 25 3d 73 78 25 3a | 79 73 69 7a 65 25 3d 73 |ze%=sx%:|ysize%=s|
|00002970| 79 25 0d 0e 42 08 20 f7 | 20 85 0d 0e 4c 06 20 e1 |y%..B. .| ...L. .|
|00002980| 0d 0e 56 10 20 f4 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |..V. .--|--------|
|00002990| 0d 0e 60 15 20 dd f2 76 | 65 72 69 66 79 73 68 75 |..`. ..v|erifyshu|
|000029a0| 74 64 6f 77 6e 0d 0e 6a | 13 20 e7 20 73 61 76 65 |tdown..j|. . save|
|000029b0| 64 5f 6f 6b 3d a3 20 8c | 0d 0e 74 3a 20 20 f2 61 |d_ok=. .|..t:  .a|
|000029c0| 6c 65 72 74 32 28 22 59 | 6f 75 20 68 61 76 65 20 |lert2("Y|ou have |
|000029d0| 77 6f 72 6b 20 74 68 61 | 74 20 68 61 73 20 6e 6f |work tha|t has no|
|000029e0| 74 20 62 65 65 6e 20 73 | 61 76 65 64 20 79 65 74 |t been s|aved yet|
|000029f0| 22 29 0d 0e 7e 49 20 20 | e7 20 61 6c 65 72 74 3d |")..~I  |. alert=|
|00002a00| 32 20 62 6c 6f 63 6b 25 | 21 30 3d 77 68 61 6e 64 |2 block%|!0=whand|
|00002a10| 6c 65 31 25 3a c8 99 22 | 57 69 6d 70 5f 43 6c 6f |le1%:.."|Wimp_Clo|
|00002a20| 73 65 57 69 6e 64 6f 77 | 22 2c 2c 62 6c 6f 63 6b |seWindow|",,block|
|00002a30| 25 3a 71 75 69 74 25 3d | b9 3a e1 0d 0e 88 11 20 |%:quit%=|.:..... |
|00002a40| 20 e7 20 61 6c 65 72 74 | 3d 33 20 8c 0d 0e 89 38 | . alert|=3 ....8|
|00002a50| 20 20 20 62 6c 6f 63 6b | 25 21 30 3d 77 68 61 6e |   block|%!0=whan|
|00002a60| 64 6c 65 38 25 3a c8 99 | 22 57 69 6d 70 5f 47 65 |dle8%:..|"Wimp_Ge|
|00002a70| 74 57 69 6e 64 6f 77 49 | 6e 66 6f 22 2c 2c 62 6c |tWindowI|nfo",,bl|
|00002a80| 6f 63 6b 25 0d 0e 8a 62 | 20 20 20 62 6c 6f 63 6b |ock%...b|   block|
|00002a90| 25 21 34 3d 28 74 6f 70 | 5f 78 2d 31 32 33 29 2f |%!4=(top|_x-123)/|
|00002aa0| 32 3a 62 6c 6f 63 6b 25 | 21 38 3d 28 74 6f 70 5f |2:block%|!8=(top_|
|00002ab0| 79 2d 31 33 34 29 2f 32 | 3a 62 6c 6f 63 6b 25 21 |y-134)/2|:block%!|
|00002ac0| 31 32 3d 62 6c 6f 63 6b | 25 21 34 2b 32 34 36 3a |12=block|%!4+246:|
|00002ad0| 62 6c 6f 63 6b 25 21 31 | 36 3d 62 6c 6f 63 6b 25 |block%!1|6=block%|
|00002ae0| 21 38 2b 31 36 38 0d 0e | 8b 36 20 20 20 c8 99 22 |!8+168..|.6   .."|
|00002af0| 57 69 6d 70 5f 4f 70 65 | 6e 57 69 6e 64 6f 77 22 |Wimp_Ope|nWindow"|
|00002b00| 2c 2c 62 6c 6f 63 6b 25 | 3a f2 69 72 65 61 64 28 |,,block%|:.iread(|
|00002b10| 30 2c 77 68 61 6e 64 6c | 65 38 25 29 0d 0e 8c 27 |0,whandl|e8%)...'|
|00002b20| 20 20 20 73 61 76 65 5f | 64 69 61 3d 31 3a f2 63 |   save_|dia=1:.c|
|00002b30| 61 72 65 74 28 30 2c 77 | 68 61 6e 64 6c 65 38 25 |aret(0,w|handle8%|
|00002b40| 29 3a e1 0d 0e 90 07 20 | 20 cd 0d 0e 92 06 20 cc |):..... | ..... .|
|00002b50| 0d 0e 9c 3f 20 20 62 6c | 6f 63 6b 25 21 30 3d 77 |...?  bl|ock%!0=w|
|00002b60| 68 61 6e 64 6c 65 31 25 | 3a c8 99 22 57 69 6d 70 |handle1%|:.."Wimp|
|00002b70| 5f 43 6c 6f 73 65 57 69 | 6e 64 6f 77 22 2c 2c 62 |_CloseWi|ndow",,b|
|00002b80| 6c 6f 63 6b 25 3a 71 75 | 69 74 25 3d b9 3a e1 0d |lock%:qu|it%=.:..|
|00002b90| 0e a6 06 20 cd 0d 0e b0 | 06 20 e1 0d 0e ba 10 20 |... ....|. ..... |
|00002ba0| f4 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 0d 0e c4 13 20 |.-------|---.... |
|00002bb0| dd f2 6f 70 74 69 6f 6e | 73 65 6c 65 63 74 0d 0e |..option|select..|
|00002bc0| ce 34 20 63 68 6f 69 63 | 65 25 3d 21 62 6c 6f 63 |.4 choic|e%=!bloc|
|00002bd0| 6b 25 3a 63 68 6f 69 63 | 65 32 25 3d 62 6c 6f 63 |k%:choic|e2%=bloc|
|00002be0| 6b 25 21 34 3a 63 72 65 | 61 74 65 5f 6d 65 6e 75 |k%!4:cre|ate_menu|
|00002bf0| 3d 30 0d 0e d8 3a 20 e7 | 20 4d 55 24 3d 22 54 69 |=0...: .| MU$="Ti|
|00002c00| 74 6c 65 22 20 84 20 4d | 55 24 3d 22 54 65 78 74 |tle" . M|U$="Text|
|00002c10| 22 20 84 20 4d 55 24 3d | 22 47 72 69 64 22 20 84 |" . MU$=|"Grid" .|
|00002c20| 20 4d 55 24 3d 22 54 72 | 79 22 20 8c 0d 0e e2 32 | MU$="Tr|y" ....2|
|00002c30| 20 20 c8 99 22 57 69 6d | 70 5f 44 65 63 6f 64 65 |  .."Wim|p_Decode|
|00002c40| 4d 65 6e 75 22 2c 2c 66 | 6f 6e 74 6d 65 6e 75 25 |Menu",,f|ontmenu%|
|00002c50| 2c 62 6c 6f 63 6b 25 2c | 66 5f 61 6e 73 25 0d 0e |,block%,|f_ans%..|
|00002c60| ec 06 20 cd 0d 0e f6 24 | 20 c8 99 22 57 69 6d 70 |.. ....$| .."Wimp|
|00002c70| 5f 47 65 74 50 6f 69 6e | 74 65 72 49 6e 66 6f 22 |_GetPoin|terInfo"|
|00002c80| 2c 2c 62 6c 6f 63 6b 25 | 0d 0f 00 3a 20 78 70 6f |,,block%|...: xpo|
|00002c90| 73 3d 21 62 6c 6f 63 6b | 25 3a 79 70 6f 73 3d 62 |s=!block|%:ypos=b|
|00002ca0| 6c 6f 63 6b 25 21 34 3a | e7 20 62 6c 6f 63 6b 25 |lock%!4:|. block%|
|00002cb0| 21 38 3d 31 20 63 72 65 | 61 74 65 5f 6d 65 6e 75 |!8=1 cre|ate_menu|
|00002cc0| 3d 31 0d 0f 0a 47 20 e7 | 20 4d 55 24 3d 22 54 69 |=1...G .| MU$="Ti|
|00002cd0| 74 6c 65 22 20 84 20 4d | 55 24 3d 22 54 65 78 74 |tle" . M|U$="Text|
|00002ce0| 22 20 84 20 4d 55 24 3d | 22 47 72 69 64 22 20 84 |" . MU$=|"Grid" .|
|00002cf0| 20 4d 55 24 3d 22 54 72 | 79 22 20 f2 6f 70 74 69 | MU$="Tr|y" .opti|
|00002d00| 6f 6e 5f 66 6f 6e 74 3a | e1 0d 0f 14 25 20 e7 20 |on_font:|....% . |
|00002d10| 4d 55 24 3d 22 62 6f 72 | 64 65 72 22 20 f2 6f 70 |MU$="bor|der" .op|
|00002d20| 74 69 6f 6e 5f 62 6f 72 | 64 65 72 32 3a e1 0d 0f |tion_bor|der2:...|
|00002d30| 1e 28 20 e7 20 4d 55 24 | 3d 22 6d 61 69 6e 6d 65 |.( . MU$|="mainme|
|00002d40| 6e 75 22 20 f2 6f 70 74 | 69 6f 6e 5f 6d 61 69 6e |nu" .opt|ion_main|
|00002d50| 6d 65 6e 75 3a e1 0d 0f | 21 23 20 e7 20 4d 55 24 |menu:...|!# . MU$|
|00002d60| 3d 22 62 6b 5f 63 6f 6c | 22 20 f2 6f 70 74 69 6f |="bk_col|" .optio|
|00002d70| 6e 5f 62 6b 63 6f 6c 3a | e1 0d 0f 28 20 20 e7 20 |n_bkcol:|...(  . |
|00002d80| 63 68 6f 69 63 65 25 3d | 31 20 f2 76 65 72 69 66 |choice%=|1 .verif|
|00002d90| 79 73 68 75 74 64 6f 77 | 6e 0d 0f 32 06 20 e1 0d |yshutdow|n..2. ..|
|00002da0| 0f 3c 10 20 f4 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 0d |.<. .---|-------.|
|00002db0| 0f 46 12 20 dd f2 6f 70 | 74 69 6f 6e 5f 66 6f 6e |.F. ..op|tion_fon|
|00002dc0| 74 0d 0f 50 11 20 c8 8e | 20 63 68 6f 69 63 65 25 |t..P. ..| choice%|
|00002dd0| 20 ca 0d 0f 5a 08 20 c9 | 20 30 0d 0f 64 15 20 20 | ...Z. .| 0..d.  |
|00002de0| e7 20 63 68 6f 69 63 65 | 32 25 3d 2d 31 20 e1 0d |. choice|2%=-1 ..|
|00002df0| 0f 6e 16 20 20 f2 63 6f | 6c 5f 72 61 6e 67 65 5f |.n.  .co|l_range_|
|00002e00| 63 68 65 63 6b 0d 0f 78 | 2a 20 20 e7 20 4d 55 24 |check..x|*  . MU$|
|00002e10| 3d 22 54 69 74 6c 65 22 | 20 74 69 74 6c 65 5f 66 |="Title"| title_f|
|00002e20| 6f 6e 74 63 6f 6c 3d 63 | 68 6f 69 63 65 32 25 0d |ontcol=c|hoice2%.|
|00002e30| 0f 82 28 20 20 e7 20 4d | 55 24 3d 22 47 72 69 64 |..(  . M|U$="Grid|
|00002e40| 22 20 67 72 69 64 5f 66 | 6f 6e 74 63 6f 6c 3d 63 |" grid_f|ontcol=c|
|00002e50| 68 6f 69 63 65 32 25 0d | 0f 8c 28 20 20 e7 20 4d |hoice2%.|..(  . M|
|00002e60| 55 24 3d 22 54 65 78 74 | 22 20 74 65 78 74 5f 66 |U$="Text|" text_f|
|00002e70| 6f 6e 74 63 6f 6c 3d 63 | 68 6f 69 63 65 32 25 0d |ontcol=c|hoice2%.|
|00002e80| 0f a0 17 20 20 e7 20 63 | 72 65 61 74 65 5f 6d 65 |...  . c|reate_me|
|00002e90| 6e 75 3d 30 20 e1 0d 0f | aa 56 20 20 e7 20 4d 55 |nu=0 ...|.V  . MU|
|00002ea0| 24 3d 22 54 69 74 6c 65 | 22 20 f2 63 6f 6c 6f 75 |$="Title|" .colou|
|00002eb0| 72 6d 65 6e 75 28 63 6f | 6c 6d 65 6e 75 2c 74 69 |rmenu(co|lmenu,ti|
|00002ec0| 74 6c 65 5f 66 6f 6e 74 | 63 6f 6c 29 3a f2 66 6f |tle_font|col):.fo|
|00002ed0| 6e 74 6d 65 6e 75 28 66 | 6f 6e 74 6d 65 6e 75 25 |ntmenu(f|ontmenu%|
|00002ee0| 2c 74 69 74 6c 65 5f 66 | 6f 6e 74 29 0d 0f b4 53 |,title_f|ont)...S|
|00002ef0| 20 20 e7 20 4d 55 24 3d | 22 54 65 78 74 22 20 f2 |  . MU$=|"Text" .|
|00002f00| 63 6f 6c 6f 75 72 6d 65 | 6e 75 28 63 6f 6c 6d 65 |colourme|nu(colme|
|00002f10| 6e 75 2c 74 65 78 74 5f | 66 6f 6e 74 63 6f 6c 29 |nu,text_|fontcol)|
|00002f20| 3a f2 66 6f 6e 74 6d 65 | 6e 75 28 66 6f 6e 74 6d |:.fontme|nu(fontm|
|00002f30| 65 6e 75 25 2c 74 65 78 | 74 5f 66 6f 6e 74 29 0d |enu%,tex|t_font).|
|00002f40| 0f be 53 20 20 e7 20 4d | 55 24 3d 22 47 72 69 64 |..S  . M|U$="Grid|
|00002f50| 22 20 f2 63 6f 6c 6f 75 | 72 6d 65 6e 75 28 63 6f |" .colou|rmenu(co|
|00002f60| 6c 6d 65 6e 75 2c 67 72 | 69 64 5f 66 6f 6e 74 63 |lmenu,gr|id_fontc|
|00002f70| 6f 6c 29 3a f2 66 6f 6e | 74 6d 65 6e 75 28 66 6f |ol):.fon|tmenu(fo|
|00002f80| 6e 74 6d 65 6e 75 25 2c | 67 72 69 64 5f 66 6f 6e |ntmenu%,|grid_fon|
|00002f90| 74 29 0d 0f d2 2f 20 20 | c8 99 22 57 69 6d 70 5f |t).../  |.."Wimp_|
|00002fa0| 43 72 65 61 74 65 4d 65 | 6e 75 22 2c 2c 66 6f 6e |CreateMe|nu",,fon|
|00002fb0| 74 6d 65 6e 75 25 2c 78 | 73 74 2d 35 31 2c 79 73 |tmenu%,x|st-51,ys|
|00002fc0| 74 0d 0f dc 07 20 20 e1 | 0d 0f e6 06 20 cb 0d 0f |t....  .|.... ...|
|00002fd0| f0 04 0d 0f fa 11 20 f2 | 63 68 6f 6f 73 65 5f 66 |...... .|choose_f|
|00002fe0| 6f 6e 74 0d 10 04 2f 20 | f2 72 6d 28 22 54 58 54 |ont.../ |.rm("TXT|
|00002ff0| 33 22 29 3a e7 20 4d 55 | 24 3d 74 65 78 74 24 20 |3"):. MU|$=text$ |
|00003000| 74 69 74 6c 65 5f 66 6f | 6e 74 3d 63 68 6f 69 63 |title_fo|nt=choic|
|00003010| 65 25 0d 10 0e 2e 20 f2 | 72 6d 28 22 54 58 54 34 |e%.... .|rm("TXT4|
|00003020| 22 29 3a e7 20 4d 55 24 | 3d 74 65 78 74 24 20 74 |"):. MU$|=text$ t|
|00003030| 65 78 74 5f 66 6f 6e 74 | 3d 63 68 6f 69 63 65 25 |ext_font|=choice%|
|00003040| 0d 10 18 2e 20 f2 72 6d | 28 22 54 58 54 32 22 29 |.... .rm|("TXT2")|
|00003050| 3a e7 20 4d 55 24 3d 74 | 65 78 74 24 20 67 72 69 |:. MU$=t|ext$ gri|
|00003060| 64 5f 66 6f 6e 74 3d 63 | 68 6f 69 63 65 25 0d 10 |d_font=c|hoice%..|
|00003070| 2c 2a 20 f2 69 73 65 74 | 28 30 2c 66 6f 6e 74 73 |,* .iset|(0,fonts|
|00003080| 24 28 74 69 74 6c 65 5f | 66 6f 6e 74 29 2c 66 6f |$(title_|font),fo|
|00003090| 6e 74 5f 77 69 6e 25 29 | 0d 10 36 29 20 f2 69 73 |nt_win%)|..6) .is|
|000030a0| 65 74 28 33 2c 66 6f 6e | 74 73 24 28 74 65 78 74 |et(3,fon|ts$(text|
|000030b0| 5f 66 6f 6e 74 29 2c 66 | 6f 6e 74 5f 77 69 6e 25 |_font),f|ont_win%|
|000030c0| 29 0d 10 40 29 20 f2 69 | 73 65 74 28 34 2c 66 6f |)..@) .i|set(4,fo|
|000030d0| 6e 74 73 24 28 67 72 69 | 64 5f 66 6f 6e 74 29 2c |nts$(gri|d_font),|
|000030e0| 66 6f 6e 74 5f 77 69 6e | 25 29 0d 10 4a 16 20 e7 |font_win|%)..J. .|
|000030f0| 20 63 72 65 61 74 65 5f | 6d 65 6e 75 3d 30 20 e1 | create_|menu=0 .|
|00003100| 0d 10 54 32 20 e7 20 4d | 55 24 3d 22 54 69 74 6c |..T2 . M|U$="Titl|
|00003110| 65 22 20 f2 66 6f 6e 74 | 6d 65 6e 75 28 66 6f 6e |e" .font|menu(fon|
|00003120| 74 6d 65 6e 75 25 2c 74 | 69 74 6c 65 5f 66 6f 6e |tmenu%,t|itle_fon|
|00003130| 74 29 0d 10 5e 30 20 e7 | 20 4d 55 24 3d 22 54 65 |t)..^0 .| MU$="Te|
|00003140| 78 74 22 20 f2 66 6f 6e | 74 6d 65 6e 75 28 66 6f |xt" .fon|tmenu(fo|
|00003150| 6e 74 6d 65 6e 75 25 2c | 74 65 78 74 5f 66 6f 6e |ntmenu%,|text_fon|
|00003160| 74 29 0d 10 68 30 20 e7 | 20 4d 55 24 3d 22 47 72 |t)..h0 .| MU$="Gr|
|00003170| 69 64 22 20 f2 66 6f 6e | 74 6d 65 6e 75 28 66 6f |id" .fon|tmenu(fo|
|00003180| 6e 74 6d 65 6e 75 25 2c | 67 72 69 64 5f 66 6f 6e |ntmenu%,|grid_fon|
|00003190| 74 29 0d 10 7c 2e 20 c8 | 99 22 57 69 6d 70 5f 43 |t)..|. .|."Wimp_C|
|000031a0| 72 65 61 74 65 4d 65 6e | 75 22 2c 2c 66 6f 6e 74 |reateMen|u",,font|
|000031b0| 6d 65 6e 75 25 2c 78 73 | 74 2d 35 31 2c 79 73 74 |menu%,xs|t-51,yst|
|000031c0| 0d 10 86 06 20 e1 0d 10 | 90 10 20 f4 2d 2d 2d 2d |.... ...|.. .----|
|000031d0| 2d 2d 2d 2d 2d 2d 0d 10 | 9a 15 20 dd f2 6f 70 74 |------..|.. ..opt|
|000031e0| 69 6f 6e 5f 62 6f 72 64 | 65 72 32 0d 10 ae 12 20 |ion_bord|er2.... |
|000031f0| e7 20 63 68 6f 69 63 65 | 25 3d 30 20 8c 0d 10 b8 |. choice|%=0 ....|
|00003200| 1e 20 20 62 6f 72 64 65 | 72 25 3d a3 3a f2 73 74 |.  borde|r%=.:.st|
|00003210| 79 6c 65 31 28 31 2c 30 | 2c 30 29 0d 10 c2 31 20 |yle1(1,0|,0)...1 |
|00003220| 20 c8 99 22 57 69 6d 70 | 5f 46 6f 72 63 65 52 65 | .."Wimp|_ForceRe|
|00003230| 64 72 61 77 22 2c 77 68 | 61 6e 64 6c 65 31 25 2c |draw",wh|andle1%,|
|00003240| 30 2c 2d 39 30 30 2c 37 | 30 30 2c 30 0d 10 cc 06 |0,-900,7|00,0....|
|00003250| 20 cc 0d 10 d6 11 20 20 | f2 72 6d 28 22 54 58 54 | .....  |.rm("TXT|
|00003260| 36 22 29 0d 10 e0 22 20 | 20 e7 20 62 6f 72 64 65 |6")..." | . borde|
|00003270| 72 73 24 28 63 68 6f 69 | 63 65 25 29 3c 3e 74 65 |rs$(choi|ce%)<>te|
|00003280| 78 74 24 20 8c 0d 10 ea | 2d 20 20 20 44 4e 24 3d |xt$ ....|-   DN$=|
|00003290| 62 6f 72 64 65 72 5f 70 | 61 74 68 24 2b 22 2e 22 |border_p|ath$+"."|
|000032a0| 2b 62 6f 72 64 65 72 73 | 24 28 63 68 6f 69 63 65 |+borders|$(choice|
|000032b0| 25 29 0d 10 f4 34 20 20 | 20 69 6d 5f 74 79 70 65 |%)...4  | im_type|
|000032c0| 24 3d 22 62 6f 72 64 65 | 72 22 3a f2 69 6d 70 6f |$="borde|r":.impo|
|000032d0| 72 74 5f 66 69 6c 65 3a | f2 73 74 79 6c 65 31 28 |rt_file:|.style1(|
|000032e0| 31 2c 30 2c 30 29 0d 10 | fe 32 20 20 20 c8 99 22 |1,0,0)..|.2   .."|
|000032f0| 57 69 6d 70 5f 46 6f 72 | 63 65 52 65 64 72 61 77 |Wimp_For|ceRedraw|
|00003300| 22 2c 77 68 61 6e 64 6c | 65 31 25 2c 30 2c 2d 39 |",whandl|e1%,0,-9|
|00003310| 30 30 2c 37 30 30 2c 30 | 0d 11 08 07 20 20 cd 0d |00,700,0|....  ..|
|00003320| 11 12 06 20 cd 0d 11 1c | 16 20 e7 20 63 72 65 61 |... ....|. . crea|
|00003330| 74 65 5f 6d 65 6e 75 3d | 30 20 e1 0d 11 30 35 20 |te_menu=|0 ...05 |
|00003340| c8 99 22 57 69 6d 70 5f | 43 72 65 61 74 65 4d 65 |.."Wimp_|CreateMe|
|00003350| 6e 75 22 2c 2c 62 6f 72 | 64 65 72 73 6d 65 6e 75 |nu",,bor|dersmenu|
|00003360| 25 2c 78 6d 65 6e 75 2d | 35 31 2c 79 6d 65 6e 75 |%,xmenu-|51,ymenu|
|00003370| 0d 11 3a 06 20 e1 0d 11 | 44 10 20 f4 2d 2d 2d 2d |..:. ...|D. .----|
|00003380| 2d 2d 2d 2d 2d 2d 0d 11 | 45 13 20 dd f2 6f 70 74 |------..|E. ..opt|
|00003390| 69 6f 6e 5f 62 6b 63 6f | 6c 0d 11 46 25 20 62 6b |ion_bkco|l..F% bk|
|000033a0| 5f 63 6f 6c 3d 63 68 6f | 69 63 65 25 3a e7 20 63 |_col=cho|ice%:. c|
|000033b0| 72 65 61 74 65 5f 6d 65 | 6e 75 3d 30 20 e1 0d 11 |reate_me|nu=0 ...|
|000033c0| 47 48 20 f2 63 6f 6c 6f | 75 72 6d 65 6e 75 28 63 |GH .colo|urmenu(c|
|000033d0| 6f 6c 6d 65 6e 75 2c 62 | 6b 5f 63 6f 6c 29 3a c8 |olmenu,b|k_col):.|
|000033e0| 99 22 57 69 6d 70 5f 43 | 72 65 61 74 65 4d 65 6e |."Wimp_C|reateMen|
|000033f0| 75 22 2c 2c 63 6f 6c 6d | 65 6e 75 2c 78 73 74 2d |u",,colm|enu,xst-|
|00003400| 35 31 2c 79 73 74 0d 11 | 48 06 20 e1 0d 11 49 10 |51,yst..|H. ...I.|
|00003410| 20 f4 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 0d 11 4e 16 | .------|----..N.|
|00003420| 20 dd f2 6f 70 74 69 6f | 6e 5f 6d 61 69 6e 6d 65 | ..optio|n_mainme|
|00003430| 6e 75 0d 11 58 12 20 e7 | 20 63 68 6f 69 63 65 25 |nu..X. .| choice%|
|00003440| 3d 33 20 8c 0d 11 62 25 | 20 20 66 69 74 74 69 6e |=3 ...b%|  fittin|
|00003450| 67 5f 72 65 70 6f 72 74 | 3d ac 20 66 69 74 74 69 |g_report|=. fitti|
|00003460| 6e 67 5f 72 65 70 6f 72 | 74 0d 11 6c 61 20 20 e7 |ng_repor|t..la  .|
|00003470| 20 63 72 65 61 74 65 5f | 6d 65 6e 75 3d 31 20 f2 | create_|menu=1 .|
|00003480| 6d 61 69 6e 6d 65 6e 75 | 28 6d 6d 65 6e 75 25 29 |mainmenu|(mmenu%)|
|00003490| 3a c8 99 22 57 69 6d 70 | 5f 43 72 65 61 74 65 4d |:.."Wimp|_CreateM|
|000034a0| 65 6e 75 22 2c 2c 6d 6d | 65 6e 75 25 2c 78 6d 65 |enu",,mm|enu%,xme|
|000034b0| 6e 75 2d 35 31 2c 79 6d | 65 6e 75 3a 4d 55 24 3d |nu-51,ym|enu:MU$=|
|000034c0| 22 6d 61 69 6e 6d 65 6e | 75 22 0d 11 76 07 20 20 |"mainmen|u"..v.  |
|000034d0| e1 0d 11 80 06 20 cd 0d | 11 8a 12 20 e7 20 63 68 |..... ..|... . ch|
|000034e0| 6f 69 63 65 25 3d 32 20 | 8c 0d 11 94 13 20 20 f2 |oice%=2 |.....  .|
|000034f0| 73 61 76 65 64 65 66 61 | 75 6c 74 73 0d 11 9e 61 |savedefa|ults...a|
|00003500| 20 20 e7 20 63 72 65 61 | 74 65 5f 6d 65 6e 75 3d |  . crea|te_menu=|
|00003510| 31 20 f2 6d 61 69 6e 6d | 65 6e 75 28 6d 6d 65 6e |1 .mainm|enu(mmen|
|00003520| 75 25 29 3a c8 99 22 57 | 69 6d 70 5f 43 72 65 61 |u%):.."W|imp_Crea|
|00003530| 74 65 4d 65 6e 75 22 2c | 2c 6d 6d 65 6e 75 25 2c |teMenu",|,mmenu%,|
|00003540| 78 6d 65 6e 75 2d 35 31 | 2c 79 6d 65 6e 75 3a 4d |xmenu-51|,ymenu:M|
|00003550| 55 24 3d 22 6d 61 69 6e | 6d 65 6e 75 22 0d 11 a8 |U$="main|menu"...|
|00003560| 07 20 20 e1 0d 11 b2 06 | 20 cd 0d 11 bc 13 20 e7 |.  .....| ..... .|
|00003570| 20 63 68 6f 69 63 65 25 | 3c 3e 31 20 e1 0d 11 c6 | choice%|<>1 ....|
|00003580| 34 20 f2 72 6d 28 22 42 | 55 54 37 22 29 3a 62 75 |4 .rm("B|UT7"):bu|
|00003590| 74 31 24 3d 74 65 78 74 | 24 3a f2 72 6d 28 22 42 |t1$=text|$:.rm("B|
|000035a0| 55 54 32 22 29 3a 62 75 | 74 32 24 3d 74 65 78 74 |UT2"):bu|t2$=text|
|000035b0| 24 0d 11 d0 2a 20 f2 72 | 6d 28 22 41 4c 54 36 22 |$...* .r|m("ALT6"|
|000035c0| 29 3a f2 61 6c 65 72 74 | 28 74 65 78 74 24 2c 62 |):.alert|(text$,b|
|000035d0| 75 74 31 24 2c 62 75 74 | 32 24 29 0d 11 da 5d 20 |ut1$,but|2$)...] |
|000035e0| e7 20 61 6c 65 72 74 3d | 30 20 80 20 63 72 65 61 |. alert=|0 . crea|
|000035f0| 74 65 5f 6d 65 6e 75 3d | 31 20 f2 6d 61 69 6e 6d |te_menu=|1 .mainm|
|00003600| 65 6e 75 28 6d 6d 65 6e | 75 25 29 3a c8 99 22 57 |enu(mmen|u%):.."W|
|00003610| 69 6d 70 5f 43 72 65 61 | 74 65 4d 65 6e 75 22 2c |imp_Crea|teMenu",|
|00003620| 2c 6d 6d 65 6e 75 25 2d | 35 31 2c 78 6d 65 6e 75 |,mmenu%-|51,xmenu|
|00003630| 2c 79 6d 65 6e 75 3a e1 | 0d 11 e4 10 20 e7 20 61 |,ymenu:.|.... . a|
|00003640| 6c 65 72 74 3d 30 20 e1 | 0d 11 ee 1c 20 62 6f 72 |lert=0 .|.... bor|
|00003650| 64 65 72 5f 70 61 74 68 | 24 3d 64 65 66 61 75 6c |der_path|$=defaul|
|00003660| 74 5f 70 24 0d 11 f8 36 | 20 f2 62 6f 72 64 65 72 |t_p$...6| .border|
|00003670| 73 28 62 6f 72 64 65 72 | 5f 70 61 74 68 24 29 3a |s(border|_path$):|
|00003680| f2 62 6f 72 64 65 72 73 | 6d 65 6e 75 28 62 6f 72 |.borders|menu(bor|
|00003690| 64 65 72 73 6d 65 6e 75 | 25 29 0d 12 02 06 20 e1 |dersmenu|%).... .|
|000036a0| 0d 12 0c 10 20 f4 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.... .--|--------|
|000036b0| 0d 12 16 0f 20 dd a4 54 | 65 6d 70 28 54 24 29 0d |.... ..T|emp(T$).|
|000036c0| 12 20 24 20 24 77 69 6e | 5f 69 64 65 6e 25 3d 54 |. $ $win|_iden%=T|
|000036d0| 24 3a ea 20 68 25 3a 77 | 64 61 25 3d 77 64 61 74 |$:. h%:w|da%=wdat|
|000036e0| 61 31 25 0d 12 2a 4b 20 | c8 99 22 57 69 6d 70 5f |a1%..*K |.."Wimp_|
|000036f0| 4c 6f 61 64 54 65 6d 70 | 6c 61 74 65 22 2c 2c 62 |LoadTemp|late",,b|
|00003700| 6c 6f 63 6b 25 2c 77 64 | 61 74 61 31 25 2c 77 64 |lock%,wd|ata1%,wd|
|00003710| 31 65 6e 64 25 2c 2d 31 | 2c 77 69 6e 5f 69 64 65 |1end%,-1|,win_ide|
|00003720| 6e 25 20 b8 20 2c 2c 77 | 64 61 74 61 31 25 0d 12 |n% . ,,w|data1%..|
|00003730| 34 18 20 62 6c 6f 63 6b | 25 21 36 34 3d 69 63 6f |4. block|%!64=ico|
|00003740| 6e 73 70 61 63 65 0d 12 | 3e 32 20 e7 20 54 24 3d |nspace..|>2 . T$=|
|00003750| 22 6d 61 69 6e 5f 70 22 | 20 6e 61 6d 65 25 3d 62 |"main_p"| name%=b|
|00003760| 6c 6f 63 6b 25 21 37 32 | 3a 62 6c 6f 63 6b 25 21 |lock%!72|:block%!|
|00003770| 31 32 3d 74 6f 70 5f 79 | 0d 12 40 2d 20 e7 20 54 |12=top_y|..@- . T|
|00003780| 24 3d 22 72 65 67 22 20 | 62 6c 6f 63 6b 25 21 28 |$="reg" |block%!(|
|00003790| 38 38 2b 34 2a 33 32 2b | 32 34 29 3d 69 63 6f 6e |88+4*32+|24)=icon|
|000037a0| 73 70 61 63 65 0d 12 48 | 2e 20 e7 20 54 24 3d 22 |space..H|. . T$="|
|000037b0| 53 41 56 45 22 20 62 6c | 6f 63 6b 25 21 28 38 38 |SAVE" bl|ock%!(88|
|000037c0| 2b 32 2a 33 32 2b 32 34 | 29 3d 69 63 6f 6e 73 70 |+2*32+24|)=iconsp|
|000037d0| 61 63 65 0d 12 52 a2 20 | e7 20 54 24 3d 22 70 72 |ace..R. |. T$="pr|
|000037e0| 69 6e 74 22 20 62 6c 6f | 63 6b 25 21 28 38 38 2b |int" blo|ck%!(88+|
|000037f0| 39 2a 33 32 2b 32 34 29 | 3d 69 63 6f 6e 73 70 61 |9*32+24)|=iconspa|
|00003800| 63 65 3a 62 6c 6f 63 6b | 25 21 28 38 38 2b 32 2a |ce:block|%!(88+2*|
|00003810| 33 32 2b 32 34 29 3d 69 | 63 6f 6e 73 70 61 63 65 |32+24)=i|conspace|
|00003820| 3a 62 6c 6f 63 6b 25 21 | 28 38 38 2b 31 30 2a 33 |:block%!|(88+10*3|
|00003830| 32 2b 32 34 29 3d 69 63 | 6f 6e 73 70 61 63 65 3a |2+24)=ic|onspace:|
|00003840| 62 6c 6f 63 6b 25 21 28 | 38 38 2b 37 2a 33 32 2b |block%!(|88+7*32+|
|00003850| 32 34 29 3d 69 63 6f 6e | 73 70 61 63 65 3a 70 72 |24)=icon|space:pr|
|00003860| 6e 5f 77 69 6e 5f 6e 61 | 6d 65 25 3d 62 6c 6f 63 |n_win_na|me%=bloc|
|00003870| 6b 25 21 37 32 0d 12 5c | 8b 20 e7 20 54 24 3d 22 |k%!72..\|. . T$="|
|00003880| 77 61 72 6e 69 6e 67 22 | 20 62 6c 6f 63 6b 25 21 |warning"| block%!|
|00003890| 28 38 38 2b 34 2a 33 32 | 2b 32 34 29 3d 69 63 6f |(88+4*32|+24)=ico|
|000038a0| 6e 73 70 61 63 65 3a 62 | 6c 6f 63 6b 25 21 28 38 |nspace:b|lock%!(8|
|000038b0| 38 2b 35 2a 33 32 2b 32 | 34 29 3d 69 63 6f 6e 73 |8+5*32+2|4)=icons|
|000038c0| 70 61 63 65 3a 62 6c 6f | 63 6b 25 21 28 38 38 2b |pace:blo|ck%!(88+|
|000038d0| 37 2a 33 32 2b 32 34 29 | 3d 69 63 6f 6e 73 70 61 |7*32+24)|=iconspa|
|000038e0| 63 65 3a 62 6c 6f 63 6b | 25 21 28 38 38 2b 38 2a |ce:block|%!(88+8*|
|000038f0| 33 32 2b 32 34 29 3d 69 | 63 6f 6e 73 70 61 63 65 |32+24)=i|conspace|
|00003900| 0d 12 66 30 20 e7 20 54 | 24 3d 22 65 72 72 62 6f |..f0 . T|$="errbo|
|00003910| 78 22 20 62 6c 6f 63 6b | 25 21 28 38 38 2b 34 2a |x" block|%!(88+4*|
|00003920| 33 32 2b 32 34 29 3d 69 | 63 6f 6e 73 70 61 63 65 |32+24)=i|conspace|
|00003930| 0d 12 70 4f 20 e7 20 54 | 24 3d 22 73 65 74 70 61 |..pO . T|$="setpa|
|00003940| 74 68 22 20 62 6c 6f 63 | 6b 25 21 28 38 38 2b 34 |th" bloc|k%!(88+4|
|00003950| 2a 33 32 2b 32 34 29 3d | 69 63 6f 6e 73 70 61 63 |*32+24)=|iconspac|
|00003960| 65 3a 62 6c 6f 63 6b 25 | 21 28 38 38 2b 38 2a 33 |e:block%|!(88+8*3|
|00003970| 32 2b 32 34 29 3d 69 63 | 6f 6e 73 70 61 63 65 0d |2+24)=ic|onspace.|
|00003980| 12 7a 31 20 e7 20 54 24 | 3d 22 66 69 74 74 69 6e |.z1 . T$|="fittin|
|00003990| 67 22 20 62 6c 6f 63 6b | 25 21 28 38 38 2b 34 2a |g" block|%!(88+4*|
|000039a0| 33 32 2b 32 34 29 3d 69 | 63 6f 6e 73 70 61 63 65 |32+24)=i|conspace|
|000039b0| 0d 12 84 22 20 e7 20 54 | 24 3d 22 74 6f 6f 6c 73 |..." . T|$="tools|
|000039c0| 22 20 f2 73 65 74 5f 74 | 6f 6f 6c 73 5f 69 63 6f |" .set_t|ools_ico|
|000039d0| 6e 73 0d 12 8e 25 20 e7 | 20 54 24 3d 22 67 72 69 |ns...% .| T$="gri|
|000039e0| 64 73 69 7a 65 22 20 f2 | 73 65 74 5f 67 73 69 7a |dsize" .|set_gsiz|
|000039f0| 65 5f 69 63 6f 6e 73 0d | 12 98 24 20 e7 20 54 24 |e_icons.|..$ . T$|
|00003a00| 3d 22 70 69 63 6b 66 6f | 6e 74 22 20 f2 73 65 74 |="pickfo|nt" .set|
|00003a10| 5f 66 6f 6e 74 5f 69 63 | 6f 6e 73 0d 12 a2 27 20 |_font_ic|ons...' |
|00003a20| c8 99 22 57 69 6d 70 5f | 43 72 65 61 74 65 57 69 |.."Wimp_|CreateWi|
|00003a30| 6e 64 6f 77 22 2c 2c 62 | 6c 6f 63 6b 25 20 b8 20 |ndow",,b|lock% . |
|00003a40| 68 25 0d 12 ac 08 20 3d | 68 25 0d 12 b6 10 20 f4 |h%.... =|h%.... .|
|00003a50| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 0d 12 c0 16 20 dd |--------|--.... .|
|00003a60| f2 73 65 74 5f 74 6f 6f | 6c 73 5f 69 63 6f 6e 73 |.set_too|ls_icons|
|00003a70| 0d 12 ca 35 20 e3 20 69 | 63 5f 6e 3d 30 20 b8 20 |...5 . i|c_n=0 . |
|00003a80| 31 35 3a 62 6c 6f 63 6b | 25 21 28 38 38 2b 69 63 |15:block|%!(88+ic|
|00003a90| 5f 6e 2a 33 32 2b 32 34 | 29 3d 69 63 6f 6e 73 70 |_n*32+24|)=iconsp|
|00003aa0| 61 63 65 3a ed 0d 12 d4 | 06 20 e1 0d 12 de 10 20 |ace:....|. ..... |
|00003ab0| f4 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 0d 12 e8 15 20 |.-------|---.... |
|00003ac0| dd f2 73 65 74 5f 66 6f | 6e 74 5f 69 63 6f 6e 73 |..set_fo|nt_icons|
|00003ad0| 0d 12 f2 34 20 e3 20 69 | 63 5f 6e 3d 36 20 b8 20 |...4 . i|c_n=6 . |
|00003ae0| 39 3a 62 6c 6f 63 6b 25 | 21 28 38 38 2b 69 63 5f |9:block%|!(88+ic_|
|00003af0| 6e 2a 33 32 2b 32 34 29 | 3d 69 63 6f 6e 73 70 61 |n*32+24)|=iconspa|
|00003b00| 63 65 3a ed 0d 12 fc 42 | 20 62 6c 6f 63 6b 25 21 |ce:....B| block%!|
|00003b10| 28 38 38 2b 31 31 2a 33 | 32 2b 32 34 29 3d 69 63 |(88+11*3|2+24)=ic|
|00003b20| 6f 6e 73 70 61 63 65 3a | 62 6c 6f 63 6b 25 21 28 |onspace:|block%!(|
|00003b30| 38 38 2b 31 33 2a 33 32 | 2b 32 34 29 3d 69 63 6f |88+13*32|+24)=ico|
|00003b40| 6e 73 70 61 63 65 0d 13 | 06 06 20 e1 0d 13 10 10 |nspace..|.. .....|
|00003b50| 20 f4 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 0d 13 1a 16 | .------|----....|
|00003b60| 20 dd f2 73 65 74 5f 67 | 73 69 7a 65 5f 69 63 6f | ..set_g|size_ico|
|00003b70| 6e 73 0d 13 24 40 20 62 | 6c 6f 63 6b 25 21 28 38 |ns..$@ b|lock%!(8|
|00003b80| 38 2b 32 2a 33 32 2b 32 | 34 29 3d 69 63 6f 6e 73 |8+2*32+2|4)=icons|
|00003b90| 70 61 63 65 3a 62 6c 6f | 63 6b 25 21 28 38 38 2b |pace:blo|ck%!(88+|
|00003ba0| 38 2a 33 32 2b 32 34 29 | 3d 69 63 6f 6e 73 70 61 |8*32+24)|=iconspa|
|00003bb0| 63 65 0d 13 2e 42 20 62 | 6c 6f 63 6b 25 21 28 38 |ce...B b|lock%!(8|
|00003bc0| 38 2b 31 30 2a 33 32 2b | 32 34 29 3d 69 63 6f 6e |8+10*32+|24)=icon|
|00003bd0| 73 70 61 63 65 3a 62 6c | 6f 63 6b 25 21 28 38 38 |space:bl|ock%!(88|
|00003be0| 2b 31 31 2a 33 32 2b 32 | 34 29 3d 69 63 6f 6e 73 |+11*32+2|4)=icons|
|00003bf0| 70 61 63 65 0d 13 38 42 | 20 62 6c 6f 63 6b 25 21 |pace..8B| block%!|
|00003c00| 28 38 38 2b 31 34 2a 33 | 32 2b 32 34 29 3d 69 63 |(88+14*3|2+24)=ic|
|00003c10| 6f 6e 73 70 61 63 65 3a | 62 6c 6f 63 6b 25 21 28 |onspace:|block%!(|
|00003c20| 38 38 2b 31 36 2a 33 32 | 2b 32 34 29 3d 69 63 6f |88+16*32|+24)=ico|
|00003c30| 6e 73 70 61 63 65 0d 13 | 3a 41 20 62 6c 6f 63 6b |nspace..|:A block|
|00003c40| 25 21 28 38 38 2b 36 2a | 33 32 2b 32 34 29 3d 69 |%!(88+6*|32+24)=i|
|00003c50| 63 6f 6e 73 70 61 63 65 | 3a 62 6c 6f 63 6b 25 21 |conspace|:block%!|
|00003c60| 28 38 38 2b 31 31 2a 33 | 32 2b 32 34 29 3d 69 63 |(88+11*3|2+24)=ic|
|00003c70| 6f 6e 73 70 61 63 65 0d | 13 42 06 20 e1 0d 13 4c |onspace.|.B. ...L|
|00003c80| 10 20 f4 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 0d 13 56 |. .-----|-----..V|
|00003c90| 0c 20 dd f2 65 72 72 6f | 72 0d 13 60 0e 20 21 62 |. ..erro|r..`. !b|
|00003ca0| 6c 6f 63 6b 25 3d 9f 0d | 13 6a 36 20 24 28 62 6c |lock%=..|.j6 $(bl|
|00003cb0| 6f 63 6b 25 2b 34 29 3d | f6 24 2b 22 20 28 69 6e |ock%+4)=|.$+" (in|
|00003cc0| 74 65 72 6e 61 6c 20 65 | 72 72 6f 72 20 63 6f 64 |ternal e|rror cod|
|00003cd0| 65 20 22 2b c3 9e 2b 22 | 29 22 2b bd 30 0d 13 74 |e "+..+"|)"+.0..t|
|00003ce0| 34 20 f2 72 6d 28 22 45 | 52 4d 31 22 29 3a c8 99 |4 .rm("E|RM1"):..|
|00003cf0| 22 57 69 6d 70 5f 52 65 | 70 6f 72 74 45 72 72 6f |"Wimp_Re|portErro|
|00003d00| 72 22 2c 62 6c 6f 63 6b | 25 2c 31 2c 74 65 78 74 |r",block|%,1,text|
|00003d10| 24 0d 13 7e 06 20 e1 0d | 13 88 10 20 f4 2d 2d 2d |$..~. ..|... .---|
|00003d20| 2d 2d 2d 2d 2d 2d 2d 0d | 13 92 10 20 dd a4 77 69 |-------.|... ..wi|
|00003d30| 6d 70 65 72 72 6f 72 0d | 13 9c 0e 20 21 62 6c 6f |mperror.|... !blo|
|00003d40| 63 6b 25 3d 9f 0d 13 a6 | 0f 20 e7 20 9f 3d 32 32 |ck%=....|. . .=22|
|00003d50| 32 20 3d b9 0d 13 b0 29 | 20 24 28 62 6c 6f 63 6b |2 =....)| $(block|
|00003d60| 25 2b 34 29 3d f6 24 2b | 22 20 28 22 2b c3 9f 2b |%+4)=.$+|" ("+..+|
|00003d70| 22 29 22 2b 22 20 22 2b | c3 9e 2b bd 30 0d 13 ba |")"+" "+|..+.0...|
|00003d80| 34 20 f2 72 6d 28 22 45 | 52 4d 31 22 29 3a c8 99 |4 .rm("E|RM1"):..|
|00003d90| 22 57 69 6d 70 5f 52 65 | 70 6f 72 74 45 72 72 6f |"Wimp_Re|portErro|
|00003da0| 72 22 2c 62 6c 6f 63 6b | 25 2c 31 2c 74 65 78 74 |r",block|%,1,text|
|00003db0| 24 0d 13 c4 07 20 3d b9 | 0d 13 ce 10 20 f4 2d 2d |$.... =.|.... .--|
|00003dc0| 2d 2d 2d 2d 2d 2d 2d 2d | 0d 13 d8 40 20 dd a4 69 |--------|...@ ..i|
|00003dd0| 63 6f 6e 64 65 66 28 77 | 68 61 6e 64 6c 65 25 2c |condef(w|handle%,|
|00003de0| 69 78 25 2c 69 79 25 2c | 69 77 25 2c 69 68 25 2c |ix%,iy%,|iw%,ih%,|
|00003df0| 66 6c 61 67 25 2c 74 65 | 78 74 24 2c 64 31 25 2c |flag%,te|xt$,d1%,|
|00003e00| 64 32 25 2c 64 33 25 29 | 0d 13 e2 30 20 62 6c 6f |d2%,d3%)|...0 blo|
|00003e10| 63 6b 25 21 30 3d 77 68 | 61 6e 64 6c 65 25 3a 62 |ck%!0=wh|andle%:b|
|00003e20| 6c 6f 63 6b 25 21 34 3d | 69 78 25 3a 62 6c 6f 63 |lock%!4=|ix%:bloc|
|00003e30| 6b 25 21 38 3d 69 79 25 | 0d 13 ec 28 20 62 6c 6f |k%!8=iy%|...( blo|
|00003e40| 63 6b 25 21 31 32 3d 69 | 78 25 2b 69 77 25 3a 62 |ck%!12=i|x%+iw%:b|
|00003e50| 6c 6f 63 6b 25 21 31 36 | 3d 69 79 25 2b 69 68 25 |lock%!16|=iy%+ih%|
|00003e60| 0d 13 f6 14 20 62 6c 6f | 63 6b 25 21 32 30 3d 66 |.... blo|ck%!20=f|
|00003e70| 6c 61 67 25 0d 14 00 0e | 20 e7 20 64 31 25 3d 30 |lag%....| . d1%=0|
|00003e80| 20 8c 0d 14 0a 17 20 24 | 28 62 6c 6f 63 6b 25 2b | ..... $|(block%+|
|00003e90| 32 34 29 3d 74 65 78 74 | 24 0d 14 14 06 20 cc 0d |24)=text|$.... ..|
|00003ea0| 14 1e 20 20 62 6c 6f 63 | 6b 25 21 32 34 3d 64 31 |..  bloc|k%!24=d1|
|00003eb0| 25 3a 62 6c 6f 63 6b 25 | 21 32 38 3d 64 32 25 0d |%:block%|!28=d2%.|
|00003ec0| 14 28 12 20 62 6c 6f 63 | 6b 25 21 33 32 3d 64 33 |.(. bloc|k%!32=d3|
|00003ed0| 25 0d 14 32 06 20 cd 0d | 14 3c 2c 20 c8 99 20 22 |%..2. ..|.<, .. "|
|00003ee0| 57 69 6d 70 5f 43 72 65 | 61 74 65 49 63 6f 6e 22 |Wimp_Cre|ateIcon"|
|00003ef0| 2c 2c 62 6c 6f 63 6b 25 | 20 b8 20 69 68 61 6e 64 |,,block%| . ihand|
|00003f00| 6c 65 25 0d 14 46 0e 20 | 3d 69 68 61 6e 64 6c 65 |le%..F. |=ihandle|
|00003f10| 25 0d 14 50 10 20 f4 2d | 2d 2d 2d 2d 2d 2d 2d 2d |%..P. .-|--------|
|00003f20| 2d 0d 14 5a 16 20 dd f2 | 6f 70 65 6e 77 69 6e 64 |-..Z. ..|openwind|
|00003f30| 6f 77 32 28 47 25 29 0d | 14 64 5a 20 21 62 6c 6f |ow2(G%).|.dZ !blo|
|00003f40| 63 6b 25 3d 47 25 3a c8 | 99 22 57 69 6d 70 5f 47 |ck%=G%:.|."Wimp_G|
|00003f50| 65 74 57 69 6e 64 6f 77 | 53 74 61 74 65 22 2c 2c |etWindow|State",,|
|00003f60| 62 6c 6f 63 6b 25 3a 62 | 6c 6f 63 6b 25 21 32 38 |block%:b|lock%!28|
|00003f70| 3d 2d 31 3a c8 99 22 57 | 69 6d 70 5f 4f 70 65 6e |=-1:.."W|imp_Open|
|00003f80| 57 69 6e 64 6f 77 22 2c | 2c 62 6c 6f 63 6b 25 3a |Window",|,block%:|
|00003f90| e1 0d 14 6e 06 20 e1 0d | 14 78 10 20 f4 2d 2d 2d |...n. ..|.x. .---|
|00003fa0| 2d 2d 2d 2d 2d 2d 2d 0d | 14 82 15 20 dd f2 6f 70 |-------.|... ..op|
|00003fb0| 65 6e 77 69 6e 64 6f 77 | 28 47 25 29 0d 14 8c 15 |enwindow|(G%)....|
|00003fc0| 20 e7 20 47 25 3d 77 68 | 61 6e 64 6c 65 31 25 20 | . G%=wh|andle1% |
|00003fd0| 8c 0d 14 96 3c 20 20 62 | 6c 6f 63 6b 25 21 31 32 |....<  b|lock%!12|
|00003fe0| 38 3d 21 62 6c 6f 63 6b | 25 3a c8 99 22 57 69 6d |8=!block|%:.."Wim|
|00003ff0| 70 5f 47 65 74 57 69 6e | 64 6f 77 53 74 61 74 65 |p_GetWin|dowState|
|00004000| 22 2c 2c 62 6c 6f 63 6b | 25 2b 31 32 38 0d 14 a0 |",,block|%+128...|
|00004010| 36 20 20 e7 20 62 6c 6f | 63 6b 25 21 31 36 30 20 |6  . blo|ck%!160 |
|00004020| 80 20 31 3c 3c 32 31 20 | c8 99 22 57 69 6d 70 5f |. 1<<21 |.."Wimp_|
|00004030| 4f 70 65 6e 57 69 6e 64 | 6f 77 22 2c 2c 62 6c 6f |OpenWind|ow",,blo|
|00004040| 63 6b 25 0d 14 aa 50 20 | 20 62 6c 6f 63 6b 25 21 |ck%...P | block%!|
|00004050| 36 34 3d 74 6f 6f 6c 73 | 5f 77 69 6e 25 3a 62 6c |64=tools|_win%:bl|
|00004060| 6f 63 6b 25 21 37 36 3d | 62 6c 6f 63 6b 25 21 34 |ock%!76=|block%!4|
|00004070| 2b 74 6f 6f 6c 78 3a 62 | 6c 6f 63 6b 25 21 36 38 |+toolx:b|lock%!68|
|00004080| 3d 62 6c 6f 63 6b 25 21 | 34 2b 74 6f 6f 6c 78 2d |=block%!|4+toolx-|
|00004090| 31 35 36 0d 14 b4 3d 20 | 20 62 6c 6f 63 6b 25 21 |156...= | block%!|
|000040a0| 38 30 3d 62 6c 6f 63 6b | 25 21 31 36 2b 74 6f 6f |80=block|%!16+too|
|000040b0| 6c 79 3a 62 6c 6f 63 6b | 25 21 37 32 3d 62 6c 6f |ly:block|%!72=blo|
|000040c0| 63 6b 25 21 31 36 2b 74 | 6f 6f 6c 79 2d 37 37 32 |ck%!16+t|ooly-772|
|000040d0| 0d 14 be 31 20 20 62 6c | 6f 63 6b 25 21 38 34 3d |...1  bl|ock%!84=|
|000040e0| 30 3a 62 6c 6f 63 6b 25 | 21 38 38 3d 30 3a 62 6c |0:block%|!88=0:bl|
|000040f0| 6f 63 6b 25 21 39 32 3d | 62 6c 6f 63 6b 25 21 32 |ock%!92=|block%!2|
|00004100| 38 0d 14 c8 24 20 20 c8 | 99 22 57 69 6d 70 5f 4f |8...$  .|."Wimp_O|
|00004110| 70 65 6e 57 69 6e 64 6f | 77 22 2c 2c 62 6c 6f 63 |penWindo|w",,bloc|
|00004120| 6b 25 2b 36 34 0d 14 d2 | 38 20 20 62 6c 6f 63 6b |k%+64...|8  block|
|00004130| 25 21 32 38 3d 74 6f 6f | 6c 73 5f 77 69 6e 25 3a |%!28=too|ls_win%:|
|00004140| c8 99 22 57 69 6d 70 5f | 4f 70 65 6e 57 69 6e 64 |.."Wimp_|OpenWind|
|00004150| 6f 77 22 2c 2c 62 6c 6f | 63 6b 25 3a e1 0d 14 dc |ow",,blo|ck%:....|
|00004160| 06 20 cd 0d 14 e6 16 20 | e7 20 47 25 3d 74 6f 6f |. ..... |. G%=too|
|00004170| 6c 73 5f 77 69 6e 25 20 | 8c 0d 14 f0 21 20 20 c8 |ls_win% |....!  .|
|00004180| 99 22 57 69 6d 70 5f 4f | 70 65 6e 57 69 6e 64 6f |."Wimp_O|penWindo|
|00004190| 77 22 2c 2c 62 6c 6f 63 | 6b 25 0d 14 fa 52 20 20 |w",,bloc|k%...R  |
|000041a0| 62 6c 6f 63 6b 25 21 30 | 3d 77 68 61 6e 64 6c 65 |block%!0|=whandle|
|000041b0| 31 25 3a c8 99 22 57 69 | 6d 70 5f 47 65 74 57 69 |1%:.."Wi|mp_GetWi|
|000041c0| 6e 64 6f 77 49 6e 66 6f | 22 2c 2c 62 6c 6f 63 6b |ndowInfo|",,block|
|000041d0| 25 3a f2 67 65 74 6f 72 | 69 67 69 6e 28 62 6c 6f |%:.getor|igin(blo|
|000041e0| 63 6b 25 2c 78 30 25 2c | 79 30 25 29 0d 15 04 6e |ck%,x0%,|y0%)...n|
|000041f0| 20 20 78 78 30 3d 62 6c | 6f 63 6b 25 21 34 3a 79 |  xx0=bl|ock%!4:y|
|00004200| 79 30 3d 62 6c 6f 63 6b | 25 21 31 36 3a 62 6c 6f |y0=block|%!16:blo|
|00004210| 63 6b 25 21 30 3d 74 6f | 6f 6c 73 5f 77 69 6e 25 |ck%!0=to|ols_win%|
|00004220| 3a c8 99 22 57 69 6d 70 | 5f 47 65 74 57 69 6e 64 |:.."Wimp|_GetWind|
|00004230| 6f 77 49 6e 66 6f 22 2c | 2c 62 6c 6f 63 6b 25 3a |owInfo",|,block%:|
|00004240| f2 67 65 74 6f 72 69 67 | 69 6e 28 62 6c 6f 63 6b |.getorig|in(block|
|00004250| 25 2c 78 30 25 2c 79 30 | 25 29 0d 15 0e 27 20 20 |%,x0%,y0|%)...'  |
|00004260| 74 6f 6f 6c 78 3d 78 30 | 25 2d 78 78 30 2b 31 35 |toolx=x0|%-xx0+15|
|00004270| 36 3a 74 6f 6f 6c 79 3d | 79 30 25 2d 79 79 30 3a |6:tooly=|y0%-yy0:|
|00004280| e1 0d 15 18 06 20 cd 0d | 15 22 16 20 e7 20 47 25 |..... ..|.". . G%|
|00004290| 3d 67 72 69 64 5f 73 69 | 7a 65 25 20 8c 0d 15 2c |=grid_si|ze% ...,|
|000042a0| 3c 20 20 62 6c 6f 63 6b | 25 21 31 32 38 3d 21 62 |<  block|%!128=!b|
|000042b0| 6c 6f 63 6b 25 3a c8 99 | 22 57 69 6d 70 5f 47 65 |lock%:..|"Wimp_Ge|
|000042c0| 74 57 69 6e 64 6f 77 53 | 74 61 74 65 22 2c 2c 62 |tWindowS|tate",,b|
|000042d0| 6c 6f 63 6b 25 2b 31 32 | 38 0d 15 36 36 20 20 e7 |lock%+12|8..66  .|
|000042e0| 20 62 6c 6f 63 6b 25 21 | 31 36 30 20 80 20 31 3c | block%!|160 . 1<|
|000042f0| 3c 32 31 20 c8 99 22 57 | 69 6d 70 5f 4f 70 65 6e |<21 .."W|imp_Open|
|00004300| 57 69 6e 64 6f 77 22 2c | 2c 62 6c 6f 63 6b 25 0d |Window",|,block%.|
|00004310| 15 40 4a 20 20 62 6c 6f | 63 6b 25 21 36 34 3d 6c |.@J  blo|ck%!64=l|
|00004320| 69 73 74 5f 77 69 6e 25 | 3a 62 6c 6f 63 6b 25 21 |ist_win%|:block%!|
|00004330| 37 36 3d 62 6c 6f 63 6b | 25 21 34 2b 34 38 2b 31 |76=block|%!4+48+1|
|00004340| 31 30 36 3a 62 6c 6f 63 | 6b 25 21 36 38 3d 62 6c |106:bloc|k%!68=bl|
|00004350| 6f 63 6b 25 21 34 2b 34 | 38 0d 15 4a 39 20 20 62 |ock%!4+4|8..J9  b|
|00004360| 6c 6f 63 6b 25 21 38 30 | 3d 62 6c 6f 63 6b 25 21 |lock%!80|=block%!|
|00004370| 31 36 2d 33 31 30 3a 62 | 6c 6f 63 6b 25 21 37 32 |16-310:b|lock%!72|
|00004380| 3d 62 6c 6f 63 6b 25 21 | 31 36 2d 33 31 30 2d 32 |=block%!|16-310-2|
|00004390| 39 38 0d 15 54 31 20 20 | 62 6c 6f 63 6b 25 21 38 |98..T1  |block%!8|
|000043a0| 34 3d 30 3a 62 6c 6f 63 | 6b 25 21 38 38 3d 30 3a |4=0:bloc|k%!88=0:|
|000043b0| 62 6c 6f 63 6b 25 21 39 | 32 3d 62 6c 6f 63 6b 25 |block%!9|2=block%|
|000043c0| 21 32 38 0d 15 5e 24 20 | 20 c8 99 22 57 69 6d 70 |!28..^$ | .."Wimp|
|000043d0| 5f 4f 70 65 6e 57 69 6e | 64 6f 77 22 2c 2c 62 6c |_OpenWin|dow",,bl|
|000043e0| 6f 63 6b 25 2b 36 34 0d | 15 68 37 20 20 62 6c 6f |ock%+64.|.h7  blo|
|000043f0| 63 6b 25 21 32 38 3d 6c | 69 73 74 5f 77 69 6e 25 |ck%!28=l|ist_win%|
|00004400| 3a c8 99 22 57 69 6d 70 | 5f 4f 70 65 6e 57 69 6e |:.."Wimp|_OpenWin|
|00004410| 64 6f 77 22 2c 2c 62 6c | 6f 63 6b 25 3a e1 0d 15 |dow",,bl|ock%:...|
|00004420| 72 06 20 cd 0d 15 7c 20 | 20 c8 99 22 57 69 6d 70 |r. ...| | .."Wimp|
|00004430| 5f 4f 70 65 6e 57 69 6e | 64 6f 77 22 2c 2c 62 6c |_OpenWin|dow",,bl|
|00004440| 6f 63 6b 25 0d 15 86 06 | 20 e1 0d 15 90 10 20 f4 |ock%....| ..... .|
|00004450| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 0d 15 9a 2a 20 dd |--------|--...* .|
|00004460| f2 64 72 61 77 6d 65 6e | 75 28 6d 25 2c 6d 65 6e |.drawmen|u(m%,men|
|00004470| 75 24 2c 78 25 2c 79 25 | 2c 6f 6e 69 63 6f 6e 62 |u$,x%,y%|,oniconb|
|00004480| 61 72 25 29 0d 15 a4 4a | 20 6d 25 3f 31 32 3d 37 |ar%)...J| m%?12=7|
|00004490| 3a 6d 25 3f 31 33 3d 32 | 3a 6d 25 3f 31 34 3d 37 |:m%?13=2|:m%?14=7|
|000044a0| 3a 6d 25 3f 31 35 3d 30 | 3a 6d 25 21 31 36 3d 32 |:m%?15=0|:m%!16=2|
|000044b0| 30 30 3a 6d 25 21 32 30 | 3d 34 34 3a 6d 25 21 32 |00:m%!20|=44:m%!2|
|000044c0| 34 3d 30 3a 70 74 72 25 | 3d 6d 25 2b 32 38 0d 15 |4=0:ptr%|=m%+28..|
|000044d0| ae 1e 20 24 6d 25 3d c0 | 6d 65 6e 75 24 2c a7 6d |.. $m%=.|menu$,.m|
|000044e0| 65 6e 75 24 2c 22 2c 22 | 29 2d 31 29 0d 15 b8 1a |enu$,","|)-1)....|
|000044f0| 20 6d 65 6e 75 24 2b 3d | 22 2c 22 3a 65 6e 74 72 | menu$+=|",":entr|
|00004500| 69 65 73 25 3d 30 0d 15 | c2 11 20 c8 95 20 6d 65 |ies%=0..|.. .. me|
|00004510| 6e 75 24 3c 3e 22 22 0d | 15 cc 20 20 6d 65 6e 75 |nu$<>"".|..  menu|
|00004520| 24 3d c1 6d 65 6e 75 24 | 2c a7 6d 65 6e 75 24 2c |$=.menu$|,.menu$,|
|00004530| 22 2c 22 29 2b 31 29 0d | 15 d6 12 20 e7 20 6d 65 |",")+1).|... . me|
|00004540| 6e 75 24 3c 3e 22 22 20 | 8c 0d 15 e0 27 20 70 74 |nu$<>"" |....' pt|
|00004550| 72 25 21 30 3d 30 3a 70 | 74 72 25 21 34 3d 2d 31 |r%!0=0:p|tr%!4=-1|
|00004560| 3a 70 74 72 25 21 38 3d | 26 37 30 30 30 30 32 31 |:ptr%!8=|&7000021|
|00004570| 0d 15 ea 3a 20 24 28 70 | 74 72 25 2b 31 32 29 3d |...: $(p|tr%+12)=|
|00004580| c0 6d 65 6e 75 24 2c a7 | 6d 65 6e 75 24 2c 22 2c |.menu$,.|menu$,",|
|00004590| 22 29 2d 31 29 3a 70 74 | 72 25 2b 3d 32 34 3a 65 |")-1):pt|r%+=24:e|
|000045a0| 6e 74 72 69 65 73 25 2b | 3d 31 0d 15 f4 06 20 cd |ntries%+|=1.... .|
|000045b0| 0d 15 fe 06 20 ce 0d 16 | 08 1c 20 70 74 72 25 21 |.... ...|.. ptr%!|
|000045c0| 2d 32 34 3d 70 74 72 25 | 21 2d 32 34 20 84 20 26 |-24=ptr%|!-24 . &|
|000045d0| 38 30 0d 16 12 21 20 e7 | 20 6f 6e 69 63 6f 6e 62 |80...! .| oniconb|
|000045e0| 61 72 25 20 6d 25 21 33 | 32 3d 77 68 61 6e 64 6c |ar% m%!3|2=whandl|
|000045f0| 65 32 25 0d 16 1c 36 20 | e7 20 6f 6e 69 63 6f 6e |e2%...6 |. onicon|
|00004600| 62 61 72 25 20 8c 20 79 | 70 6f 73 25 3d 39 36 2b |bar% . y|pos%=96+|
|00004610| 65 6e 74 72 69 65 73 25 | 2a 34 34 20 8b 20 79 70 |entries%|*44 . yp|
|00004620| 6f 73 25 3d 79 25 2b 32 | 30 0d 16 26 29 20 c8 99 |os%=y%+2|0..&) ..|
|00004630| 20 22 57 69 6d 70 5f 43 | 72 65 61 74 65 4d 65 6e | "Wimp_C|reateMen|
|00004640| 75 22 2c 2c 6d 25 2c 78 | 25 2d 36 34 2c 79 70 6f |u",,m%,x|%-64,ypo|
|00004650| 73 25 0d 16 30 06 20 e1 | 0d 16 3a 10 20 f4 2d 2d |s%..0. .|..:. .--|
|00004660| 2d 2d 2d 2d 2d 2d 2d 2d | 0d 16 44 24 20 dd f2 67 |--------|..D$ ..g|
|00004670| 65 74 6f 72 69 67 69 6e | 28 62 6c 6f 63 6b 25 2c |etorigin|(block%,|
|00004680| f8 20 78 30 25 2c f8 20 | 79 30 25 29 0d 16 4e 33 |. x0%,. |y0%)..N3|
|00004690| 20 78 30 25 3d 62 6c 6f | 63 6b 25 21 34 2d 62 6c | x0%=blo|ck%!4-bl|
|000046a0| 6f 63 6b 25 21 32 30 3a | 79 30 25 3d 62 6c 6f 63 |ock%!20:|y0%=bloc|
|000046b0| 6b 25 21 31 36 2d 62 6c | 6f 63 6b 25 21 32 34 0d |k%!16-bl|ock%!24.|
|000046c0| 16 58 3e 20 6d 69 6e 78 | 3d 62 6c 6f 63 6b 25 21 |.X> minx|=block%!|
|000046d0| 34 3a 6d 69 6e 79 3d 62 | 6c 6f 63 6b 25 21 38 3a |4:miny=b|lock%!8:|
|000046e0| 6d 61 78 78 3d 62 6c 6f | 63 6b 25 21 31 32 3a 6d |maxx=blo|ck%!12:m|
|000046f0| 61 78 79 3d 62 6c 6f 63 | 6b 25 21 31 36 0d 16 62 |axy=bloc|k%!16..b|
|00004700| 06 20 e1 0d 16 6c 10 20 | f4 2d 2d 2d 2d 2d 2d 2d |. ...l. |.-------|
|00004710| 2d 2d 2d 0d 16 76 0c 20 | dd f2 72 65 73 65 74 0d |---..v. |..reset.|
|00004720| 16 80 3c 20 73 61 76 65 | 64 5f 6f 6b 3d b9 3a 24 |..< save|d_ok=.:$|
|00004730| 6e 61 6d 65 25 3d 22 43 | 72 6f 73 73 20 57 6f 72 |name%="C|ross Wor|
|00004740| 64 20 3c 75 6e 74 69 74 | 6c 65 64 3e 22 3a f2 75 |d <untit|led>":.u|
|00004750| 70 64 61 74 65 5f 74 69 | 74 6c 65 0d 16 8a 27 20 |pdate_ti|tle...' |
|00004760| e3 20 46 3d 30 20 b8 20 | 32 33 3a f2 69 73 65 74 |. F=0 . |23:.iset|
|00004770| 28 46 2c 22 22 2c 6c 69 | 73 74 5f 77 69 6e 25 29 |(F,"",li|st_win%)|
|00004780| 3a ed 0d 16 94 28 20 e3 | 20 46 3d 37 32 20 b8 20 |:....( .| F=72 . |
|00004790| 39 35 3a f2 69 73 65 74 | 28 46 2c 22 22 2c 6c 69 |95:.iset|(F,"",li|
|000047a0| 73 74 5f 77 69 6e 25 29 | 3a ed 0d 16 95 29 20 e3 |st_win%)|:....) .|
|000047b0| 20 46 3d 31 20 b8 20 32 | 34 3a 57 44 24 28 31 2c | F=1 . 2|4:WD$(1,|
|000047c0| 46 29 3d 22 22 3a 57 44 | 24 28 32 2c 46 29 3d 22 |F)="":WD|$(2,F)="|
|000047d0| 22 3a ed 0d 16 96 31 20 | e3 20 46 3d 31 20 b8 20 |":....1 |. F=1 . |
|000047e0| 32 34 3a 57 44 5f 43 28 | 46 29 3d 30 3a 57 44 5f |24:WD_C(|F)=0:WD_|
|000047f0| 52 28 46 29 3d 30 3a 57 | 44 5f 44 49 52 28 46 29 |R(F)=0:W|D_DIR(F)|
|00004800| 3d 30 3a ed 0d 16 97 36 | 20 e3 20 46 3d 31 20 b8 |=0:....6| . F=1 .|
|00004810| 20 32 30 3a e3 20 47 3d | 31 20 b8 20 32 30 3a 57 | 20:. G=|1 . 20:W|
|00004820| 44 5f 4e 28 46 2c 47 29 | 3d 30 3a 53 51 24 28 46 |D_N(F,G)|=0:SQ$(F|
|00004830| 2c 47 29 3d 22 22 3a ed | 3a ed 0d 16 9e 43 20 f2 |,G)="":.|:....C .|
|00004840| 69 73 65 74 28 30 2c 22 | 55 6e 74 69 74 6c 65 64 |iset(0,"|Untitled|
|00004850| 22 2c 77 68 61 6e 64 6c | 65 38 25 29 3a f2 69 73 |",whandl|e8%):.is|
|00004860| 65 74 28 33 2c 22 22 2c | 67 72 69 64 5f 73 69 7a |et(3,"",|grid_siz|
|00004870| 65 25 29 3a 54 69 74 6c | 65 24 3d 22 22 0d 16 a8 |e%):Titl|e$=""...|
|00004880| 06 20 e1 0d 16 b2 10 20 | f4 2d 2d 2d 2d 2d 2d 2d |. ..... |.-------|
|00004890| 2d 2d 2d 0d 16 bc 15 20 | dd f2 69 73 65 74 28 78 |---.... |..iset(x|
|000048a0| 25 2c 61 24 2c 57 48 29 | 0d 16 c6 4a 20 62 6c 6f |%,a$,WH)|...J blo|
|000048b0| 63 6b 25 21 30 3d 57 48 | 3a 62 6c 6f 63 6b 25 21 |ck%!0=WH|:block%!|
|000048c0| 34 3d 78 25 3a c8 99 22 | 57 69 6d 70 5f 47 65 74 |4=x%:.."|Wimp_Get|
|000048d0| 49 63 6f 6e 53 74 61 74 | 65 22 2c 2c 62 6c 6f 63 |IconStat|e",,bloc|
|000048e0| 6b 25 3a 24 28 62 6c 6f | 63 6b 25 21 32 38 29 3d |k%:$(blo|ck%!28)=|
|000048f0| 61 24 0d 16 d0 3c 20 62 | 6c 6f 63 6b 25 21 38 3d |a$...< b|lock%!8=|
|00004900| 30 3a 62 6c 6f 63 6b 25 | 21 31 32 3d 30 3a c8 99 |0:block%|!12=0:..|
|00004910| 20 22 57 69 6d 70 5f 53 | 65 74 49 63 6f 6e 53 74 | "Wimp_S|etIconSt|
|00004920| 61 74 65 22 2c 2c 62 6c | 6f 63 6b 25 3a e1 0d 16 |ate",,bl|ock%:...|
|00004930| da 10 20 f4 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 0d 16 |.. .----|------..|
|00004940| e4 13 20 dd f2 69 72 65 | 61 64 28 78 25 2c 57 48 |.. ..ire|ad(x%,WH|
|00004950| 29 0d 16 ee 3b 20 62 6c | 6f 63 6b 25 21 30 3d 57 |)...; bl|ock%!0=W|
|00004960| 48 3a 62 6c 6f 63 6b 25 | 21 34 3d 78 25 3a c8 99 |H:block%|!4=x%:..|
|00004970| 20 22 57 69 6d 70 5f 47 | 65 74 49 63 6f 6e 53 74 | "Wimp_G|etIconSt|
|00004980| 61 74 65 22 2c 2c 62 6c | 6f 63 6b 25 0d 16 f8 16 |ate",,bl|ock%....|
|00004990| 20 61 24 3d 24 28 62 6c | 6f 63 6b 25 21 32 38 29 | a$=$(bl|ock%!28)|
|000049a0| 3a e1 0d 17 02 10 20 f4 | 2d 2d 2d 2d 2d 2d 2d 2d |:..... .|--------|
|000049b0| 2d 2d 0d 17 0c 13 20 dd | f2 6d 61 69 6e 6d 65 6e |--.... .|.mainmen|
|000049c0| 75 28 6d 25 29 0d 17 16 | 58 20 6d 25 3f 31 32 3d |u(m%)...|X m%?12=|
|000049d0| 37 3a 6d 25 3f 31 33 3d | 32 3a 6d 25 3f 31 34 3d |7:m%?13=|2:m%?14=|
|000049e0| 37 3a 6d 25 3f 31 35 3d | 30 3a 6d 25 21 31 36 3d |7:m%?15=|0:m%!16=|
|000049f0| 32 33 34 3a 6d 25 21 32 | 30 3d 34 34 3a 6d 25 21 |234:m%!2|0=44:m%!|
|00004a00| 32 34 3d 30 3a 70 74 72 | 25 3d 6d 25 2b 32 38 3a |24=0:ptr|%=m%+28:|
|00004a10| 69 6e 64 69 72 25 3d 6d | 25 2b 32 35 36 0d 17 20 |indir%=m|%+256.. |
|00004a20| 2b 20 f2 72 6d 28 22 4d | 55 41 31 22 29 3a 6d 6d |+ .rm("M|UA1"):mm|
|00004a30| 6c 3d a7 74 65 78 74 24 | 2c 22 2c 22 29 3a 65 6e |l=.text$|,","):en|
|00004a40| 74 72 69 65 73 25 3d 30 | 0d 17 2a 31 20 24 6d 25 |tries%=0|..*1 $m%|
|00004a50| 3d c0 74 65 78 74 24 2c | 6d 6d 6c 2d 31 29 3a 74 |=.text$,|mml-1):t|
|00004a60| 65 78 74 24 3d c2 74 65 | 78 74 24 2c a9 28 74 65 |ext$=.te|xt$,.(te|
|00004a70| 78 74 24 29 2d 6d 6d 6c | 29 0d 17 34 06 20 f5 0d |xt$)-mml|)..4. ..|
|00004a80| 17 3e 15 20 20 6d 6d 6c | 3d a7 74 65 78 74 24 2c |.>.  mml|=.text$,|
|00004a90| 22 2c 22 29 0d 17 48 19 | 20 20 6d 65 6e 75 24 3d |",")..H.|  menu$=|
|00004aa0| c0 74 65 78 74 24 2c 6d | 6d 6c 2d 31 29 0d 17 52 |.text$,m|ml-1)..R|
|00004ab0| 15 20 20 20 e7 20 6d 65 | 6e 75 24 3c 3e 22 2a 22 |.   . me|nu$<>"*"|
|00004ac0| 20 8c 0d 17 5c 22 20 20 | 20 20 74 65 78 74 24 3d | ...\"  |  text$=|
|00004ad0| c2 74 65 78 74 24 2c a9 | 28 74 65 78 74 24 29 2d |.text$,.|(text$)-|
|00004ae0| 6d 6d 6c 29 0d 17 66 33 | 20 20 20 20 70 74 72 25 |mml)..f3|    ptr%|
|00004af0| 21 30 3d 30 3a e7 20 65 | 6e 74 72 69 65 73 25 3d |!0=0:. e|ntries%=|
|00004b00| 30 20 84 20 65 6e 74 72 | 69 65 73 25 3d 32 20 70 |0 . entr|ies%=2 p|
|00004b10| 74 72 25 21 30 3d 32 0d | 17 70 31 20 20 20 20 e7 |tr%!0=2.|.p1    .|
|00004b20| 20 65 6e 74 72 69 65 73 | 25 3d 33 20 80 20 66 69 | entries|%=3 . fi|
|00004b30| 74 74 69 6e 67 5f 72 65 | 70 6f 72 74 3d b9 20 70 |tting_re|port=. p|
|00004b40| 74 72 25 21 30 2b 3d 31 | 0d 17 7a 21 20 20 20 20 |tr%!0+=1|..z!    |
|00004b50| 70 74 72 25 21 34 3d 2d | 31 3a 70 74 72 25 21 38 |ptr%!4=-|1:ptr%!8|
|00004b60| 3d 26 37 30 30 30 30 32 | 31 0d 17 84 16 20 20 20 |=&700002|1....   |
|00004b70| 20 e7 20 a9 6d 65 6e 75 | 24 3c 3d 31 32 20 8c 0d | . .menu|$<=12 ..|
|00004b80| 17 8e 2e 20 20 20 20 20 | 24 28 70 74 72 25 2b 31 |...     |$(ptr%+1|
|00004b90| 32 29 3d 6d 65 6e 75 24 | 3a 70 74 72 25 2b 3d 32 |2)=menu$|:ptr%+=2|
|00004ba0| 34 3a 65 6e 74 72 69 65 | 73 25 2b 3d 31 0d 17 98 |4:entrie|s%+=1...|
|00004bb0| 09 20 20 20 20 cc 0d 17 | a2 40 20 20 20 20 20 70 |.    ...|.@     p|
|00004bc0| 74 72 25 21 31 32 3d 69 | 6e 64 69 72 25 3a 70 74 |tr%!12=i|ndir%:pt|
|00004bd0| 72 25 21 31 36 3d 30 3a | 70 74 72 25 21 32 30 3d |r%!16=0:|ptr%!20=|
|00004be0| a9 6d 65 6e 75 24 2b 31 | 3a 24 69 6e 64 69 72 25 |.menu$+1|:$indir%|
|00004bf0| 3d 6d 65 6e 75 24 0d 17 | ac 47 20 20 20 20 20 70 |=menu$..|.G     p|
|00004c00| 74 72 25 21 38 3d 28 70 | 74 72 25 21 38 20 84 20 |tr%!8=(p|tr%!8 . |
|00004c10| 26 31 30 30 29 3a 70 74 | 72 25 2b 3d 32 34 3a 65 |&100):pt|r%+=24:e|
|00004c20| 6e 74 72 69 65 73 25 2b | 3d 31 3a 69 6e 64 69 72 |ntries%+|=1:indir|
|00004c30| 25 2b 3d 28 a9 6d 65 6e | 75 24 2b 31 29 0d 17 b6 |%+=(.men|u$+1)...|
|00004c40| 09 20 20 20 20 cd 0d 17 | c0 32 20 20 20 e7 20 36 |.    ...|.2   . 6|
|00004c50| 34 2b 28 a9 6d 65 6e 75 | 24 2a 31 34 29 3e 6d 25 |4+(.menu|$*14)>m%|
|00004c60| 21 31 36 20 6d 25 21 31 | 36 3d 36 34 2b 28 a9 6d |!16 m%!1|6=64+(.m|
|00004c70| 65 6e 75 24 2a 31 34 29 | 0d 17 ca 07 20 20 cd 0d |enu$*14)|....  ..|
|00004c80| 17 d4 56 20 20 e7 20 70 | 74 72 25 3e 6d 25 2b 32 |..V  . p|tr%>m%+2|
|00004c90| 35 36 20 85 20 31 2c 22 | 4e 4f 20 52 4f 4f 4d 20 |56 . 1,"|NO ROOM |
|00004ca0| 46 4f 52 20 4d 45 4e 55 | 53 22 20 8b 20 e7 20 69 |FOR MENU|S" . . i|
|00004cb0| 6e 64 69 72 25 3e 6d 25 | 2b 34 35 30 20 85 20 32 |ndir%>m%|+450 . 2|
|00004cc0| 2c 22 4d 45 4e 55 20 49 | 54 45 4d 53 20 54 4f 4f |,"MENU I|TEMS TOO|
|00004cd0| 20 42 49 47 22 0d 17 de | 10 20 fd 20 6d 65 6e 75 | BIG"...|. . menu|
|00004ce0| 24 3d 22 2a 22 0d 17 e8 | 2c 20 70 74 72 25 21 2d |$="*"...|, ptr%!-|
|00004cf0| 32 34 3d 70 74 72 25 21 | 2d 32 34 20 84 20 26 38 |24=ptr%!|-24 . &8|
|00004d00| 30 3a 6d 25 21 33 32 3d | 77 68 61 6e 64 6c 65 38 |0:m%!32=|whandle8|
|00004d10| 25 0d 17 f2 06 20 e1 0d | 17 fc 10 20 f4 2d 2d 2d |%.... ..|... .---|
|00004d20| 2d 2d 2d 2d 2d 2d 2d 0d | 18 06 1b 20 dd f2 63 6f |-------.|... ..co|
|00004d30| 6c 6f 75 72 6d 65 6e 75 | 28 6d 25 2c 63 6f 6c 6f |lourmenu|(m%,colo|
|00004d40| 25 29 0d 18 10 4a 20 6d | 25 3f 31 32 3d 37 3a 6d |%)...J m|%?12=7:m|
|00004d50| 25 3f 31 33 3d 32 3a 6d | 25 3f 31 34 3d 37 3a 6d |%?13=2:m|%?14=7:m|
|00004d60| 25 3f 31 35 3d 30 3a 6d | 25 21 31 36 3d 31 30 30 |%?15=0:m|%!16=100|
|00004d70| 3a 6d 25 21 32 30 3d 34 | 34 3a 6d 25 21 32 34 3d |:m%!20=4|4:m%!24=|
|00004d80| 30 3a 70 74 72 25 3d 6d | 25 2b 32 38 0d 18 1a 1a |0:ptr%=m|%+28....|
|00004d90| 20 f2 72 6d 28 22 4d 55 | 41 34 22 29 3a 24 6d 25 | .rm("MU|A4"):$m%|
|00004da0| 3d 74 65 78 74 24 0d 18 | 24 0b 20 f7 20 8d 54 6e |=text$..|$. . .Tn|
|00004db0| 58 0d 18 2e b6 20 dc 20 | 31 31 37 34 34 30 35 36 |X.... . |11744056|
|00004dc0| 39 2c 33 38 35 38 37 36 | 30 32 35 2c 36 35 34 33 |9,385876|025,6543|
|00004dd0| 31 31 34 38 31 2c 39 32 | 32 37 34 36 39 33 37 2c |11481,92|2746937,|
|00004de0| 31 31 39 31 31 38 32 33 | 39 33 2c 31 34 35 39 36 |11911823|93,14596|
|00004df0| 31 37 38 34 39 2c 31 36 | 31 30 36 31 32 37 39 33 |17849,16|10612793|
|00004e00| 2c 31 38 37 39 30 34 38 | 32 34 39 2c 2d 32 30 33 |,1879048|249,-203|
|00004e10| 30 30 34 33 30 37 39 2c | 2d 31 37 36 31 36 30 37 |0043079,|-1761607|
|00004e20| 36 32 33 2c 2d 31 34 39 | 33 31 37 32 31 36 37 2c |623,-149|3172167,|
|00004e30| 2d 31 32 32 34 37 33 36 | 37 31 31 2c 2d 39 35 36 |-1224736|711,-956|
|00004e40| 33 30 31 32 35 35 2c 2d | 36 38 37 38 36 35 37 39 |301255,-|68786579|
|00004e50| 39 2c 2d 34 31 39 34 33 | 30 33 34 33 2c 2d 31 35 |9,-41943|0343,-15|
|00004e60| 30 39 39 34 38 38 37 0d | 18 38 2d 20 e3 20 6c 6f |0994887.|.8- . lo|
|00004e70| 6f 70 3d 30 20 b8 20 31 | 35 3a f3 20 64 6a 70 74 |op=0 . 1|5:. djpt|
|00004e80| 25 3a 70 74 72 25 21 30 | 3d 30 3a 70 74 72 25 21 |%:ptr%!0|=0:ptr%!|
|00004e90| 34 3d 2d 31 0d 18 42 1a | 20 e7 20 63 6f 6c 6f 25 |4=-1..B.| . colo%|
|00004ea0| 3d 6c 6f 6f 70 20 70 74 | 72 25 21 30 3d 31 0d 18 |=loop pt|r%!0=1..|
|00004eb0| 4c 2d 20 70 74 72 25 21 | 38 3d 64 6a 70 74 25 3a |L- ptr%!|8=djpt%:|
|00004ec0| 24 28 70 74 72 25 2b 31 | 32 29 3d c3 28 6c 6f 6f |$(ptr%+1|2)=.(loo|
|00004ed0| 70 29 3a 70 74 72 25 2b | 3d 32 34 0d 18 56 06 20 |p):ptr%+|=24..V. |
|00004ee0| ed 0d 18 60 1c 20 70 74 | 72 25 21 2d 32 34 3d 70 |...`. pt|r%!-24=p|
|00004ef0| 74 72 25 21 2d 32 34 20 | 84 20 26 38 30 0d 18 6a |tr%!-24 |. &80..j|
|00004f00| 06 20 e1 0d 18 74 10 20 | f4 2d 2d 2d 2d 2d 2d 2d |. ...t. |.-------|
|00004f10| 2d 2d 2d 0d 18 7e 10 20 | dd f2 70 72 69 6e 74 63 |---..~. |..printc|
|00004f20| 74 72 6c 0d 18 88 1a 20 | f2 6d 69 6e 69 5f 70 6f |trl.... |.mini_po|
|00004f30| 6c 6c 3a f2 6d 69 6e 69 | 5f 70 6f 6c 6c 0d 18 92 |ll:.mini|_poll...|
|00004f40| 38 20 f2 70 64 72 69 76 | 65 72 3a f2 72 6d 28 22 |8 .pdriv|er:.rm("|
|00004f50| 45 52 52 42 22 29 3a e7 | 20 74 79 70 24 3d 74 65 |ERRB"):.| typ$=te|
|00004f60| 78 74 24 20 f2 6e 6f 64 | 72 69 76 65 72 5f 65 72 |xt$ .nod|river_er|
|00004f70| 72 6f 72 3a e1 0d 18 9c | 2c 20 c8 99 22 4f 53 5f |ror:....|, .."OS_|
|00004f80| 52 65 61 64 4d 6f 64 65 | 56 61 72 69 61 62 6c 65 |ReadMode|Variable|
|00004f90| 22 2c 2d 31 2c 35 20 b8 | 20 2c 2c 79 73 74 69 6e |",-1,5 .| ,,ystin|
|00004fa0| 74 0d 18 a6 2c 20 c8 99 | 22 4f 53 5f 52 65 61 64 |t..., ..|"OS_Read|
|00004fb0| 4d 6f 64 65 56 61 72 69 | 61 62 6c 65 22 2c 2d 31 |ModeVari|able",-1|
|00004fc0| 2c 34 20 b8 20 2c 2c 78 | 73 74 69 6e 74 0d 18 b0 |,4 . ,,x|stint...|
|00004fd0| 26 20 67 78 30 25 3d 30 | 3a 67 79 30 25 3d 30 3a |& gx0%=0|:gy0%=0:|
|00004fe0| 67 78 31 25 3d 31 38 35 | 30 3a 67 79 31 25 3d 31 |gx1%=185|0:gy1%=1|
|00004ff0| 38 35 30 0d 18 ba 08 20 | ea 20 85 0d 18 c4 1c 20 |850.... |. ..... |
|00005000| ee 20 85 20 ea 3a f7 20 | 85 3a f2 70 72 6e 5f 65 |. . .:. |.:.prn_e|
|00005010| 72 72 6f 72 31 3a e1 0d | 18 ce 3b 20 f2 69 72 65 |rror1:..|..; .ire|
|00005020| 61 64 28 34 2c 77 68 61 | 6e 64 6c 65 31 34 25 29 |ad(4,wha|ndle14%)|
|00005030| 3a 63 6f 70 69 65 73 25 | 3d bb 28 61 24 29 3a 65 |:copies%|=.(a$):e|
|00005040| 72 72 25 3d a3 3a 63 75 | 72 72 5f 63 6f 70 79 25 |rr%=.:cu|rr_copy%|
|00005050| 3d 30 0d 18 d8 08 20 f7 | 20 85 0d 18 e2 04 0d 18 |=0.... .| .......|
|00005060| ec 06 20 f5 0d 18 f6 3d | 20 20 70 72 6e 74 5f 73 |.. ....=|  prnt_s|
|00005070| 74 61 74 75 73 3d 31 3a | f2 70 72 69 6e 74 3a 70 |tatus=1:|.print:p|
|00005080| 72 6e 74 5f 73 74 61 74 | 75 73 3d 30 3a e7 20 65 |rnt_stat|us=0:. e|
|00005090| 72 72 25 3d b9 20 f2 70 | 72 6e 5f 65 72 72 6f 72 |rr%=. .p|rn_error|
|000050a0| 31 0d 19 00 24 20 20 c8 | 99 22 48 6f 75 72 67 6c |1...$  .|."Hourgl|
|000050b0| 61 73 73 5f 53 6d 61 73 | 68 22 3a 63 6f 70 69 65 |ass_Smas|h":copie|
|000050c0| 73 25 2d 3d 31 0d 19 0a | 1f 20 20 e7 20 70 72 69 |s%-=1...|.  . pri|
|000050d0| 6e 74 5f 70 61 75 73 65 | 3d a3 20 63 6f 70 69 65 |nt_pause|=. copie|
|000050e0| 73 25 3d 30 0d 19 14 2c | 20 20 e7 20 63 6f 70 69 |s%=0...,|  . copi|
|000050f0| 65 73 25 3e 30 20 80 20 | 70 72 69 6e 74 5f 70 61 |es%>0 . |print_pa|
|00005100| 75 73 65 3d b9 20 f2 70 | 72 6e 5f 70 61 75 73 65 |use=. .p|rn_pause|
|00005110| 0d 19 1e 11 20 fd 20 63 | 6f 70 69 65 73 25 3c 3d |.... . c|opies%<=|
|00005120| 30 0d 19 28 22 20 e7 20 | 28 70 72 69 6e 74 5f 61 |0..(" . |(print_a|
|00005130| 6e 73 77 65 72 3d b9 20 | 80 20 65 72 72 25 3d a3 |nswer=. |. err%=.|
|00005140| 29 20 8c 0d 19 32 20 20 | 20 e7 20 70 72 69 6e 74 |) ...2  | . print|
|00005150| 5f 70 61 75 73 65 3d b9 | 20 f2 70 72 6e 5f 70 61 |_pause=.| .prn_pa|
|00005160| 75 73 65 0d 19 3c 53 20 | 20 e7 20 65 72 72 25 3d |use..<S | . err%=|
|00005170| a3 20 70 72 6e 74 5f 73 | 74 61 74 75 73 3d 31 3a |. prnt_s|tatus=1:|
|00005180| 64 6f 5f 61 6e 73 77 65 | 72 3d 31 3a 63 6f 70 69 |do_answe|r=1:copi|
|00005190| 65 73 25 3d 31 3a f2 70 | 72 69 6e 74 3a 64 6f 5f |es%=1:.p|rint:do_|
|000051a0| 61 6e 73 77 65 72 3d 30 | 3a 70 72 6e 74 5f 73 74 |answer=0|:prnt_st|
|000051b0| 61 74 75 73 3d 30 0d 19 | 46 06 20 cd 0d 19 50 06 |atus=0..|F. ...P.|
|000051c0| 20 e1 0d 19 5a 10 20 f4 | 2d 2d 2d 2d 2d 2d 2d 2d | ...Z. .|--------|
|000051d0| 2d 2d 0d 19 64 10 20 dd | f2 70 72 6e 5f 70 61 75 |--..d. .|.prn_pau|
|000051e0| 73 65 0d 19 6e 18 20 c8 | 99 22 48 6f 75 72 67 6c |se..n. .|."Hourgl|
|000051f0| 61 73 73 5f 53 6d 61 73 | 68 22 0d 19 78 34 20 f2 |ass_Smas|h"..x4 .|
|00005200| 72 6d 28 22 42 55 54 35 | 22 29 3a 62 75 74 31 24 |rm("BUT5|"):but1$|
|00005210| 3d 74 65 78 74 24 3a f2 | 72 6d 28 22 42 55 54 32 |=text$:.|rm("BUT2|
|00005220| 22 29 3a 62 75 74 32 24 | 3d 74 65 78 74 24 0d 19 |"):but2$|=text$..|
|00005230| 82 45 20 f2 72 6d 28 22 | 41 4c 54 34 22 29 3a f2 |.E .rm("|ALT4"):.|
|00005240| 61 6c 65 72 74 28 74 65 | 78 74 24 2c 62 75 74 31 |alert(te|xt$,but1|
|00005250| 24 2c 62 75 74 32 24 29 | 3a e7 20 61 6c 65 72 74 |$,but2$)|:. alert|
|00005260| 3d 30 20 65 72 72 25 3d | b9 3a 63 6f 70 69 65 73 |=0 err%=|.:copies|
|00005270| 25 3d 30 0d 19 8c 06 20 | e1 0d 19 96 10 20 f4 2d |%=0.... |..... .-|
|00005280| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 0d 19 a0 11 20 dd f2 |--------|-.... ..|
|00005290| 70 72 6e 5f 65 72 72 6f | 72 31 0d 19 aa 18 20 c8 |prn_erro|r1.... .|
|000052a0| 99 22 48 6f 75 72 67 6c | 61 73 73 5f 53 6d 61 73 |."Hourgl|ass_Smas|
|000052b0| 68 22 0d 19 b4 26 20 74 | 65 78 74 24 3d 22 50 72 |h"...& t|ext$="Pr|
|000052c0| 69 6e 74 69 6e 67 20 41 | 62 6f 72 74 65 64 20 28 |inting A|borted (|
|000052d0| 22 2b f6 24 2b 22 29 22 | 0d 19 be 1d 20 f2 65 72 |"+.$+")"|.... .er|
|000052e0| 72 62 6f 78 28 74 65 78 | 74 24 29 3a 63 6f 70 69 |rbox(tex|t$):copi|
|000052f0| 65 73 25 3d 30 0d 19 c8 | 06 20 e1 0d 19 d2 10 20 |es%=0...|. ..... |
|00005300| f4 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 0d 19 dc 0c 20 |.-------|---.... |
|00005310| dd f2 70 72 69 6e 74 0d | 19 e6 08 20 ea 20 85 0d |..print.|... . ..|
|00005320| 19 f0 1d 20 ee 20 85 20 | ea 20 f7 20 85 3a d9 23 |... . . |. . .:.#|
|00005330| 70 66 25 3a 65 72 72 25 | 3d b9 3a e1 0d 19 fa 42 |pf%:err%|=.:....B|
|00005340| 20 ff 28 22 52 4d 45 6e | 73 75 72 65 20 50 44 72 | .("RMEn|sure PDr|
|00005350| 69 76 65 72 20 30 20 45 | 52 52 4f 52 20 32 35 35 |iver 0 E|RROR 255|
|00005360| 20 4e 6f 20 70 72 69 6e | 74 65 72 20 64 72 69 76 | No prin|ter driv|
|00005370| 65 72 20 69 6e 73 74 61 | 6c 6c 65 64 22 29 0d 1a |er insta|lled")..|
|00005380| 04 15 20 c8 99 22 48 6f | 75 72 67 6c 61 73 73 5f |.. .."Ho|urglass_|
|00005390| 4f 6e 22 0d 1a 0e 1d 20 | 70 66 25 3d ae 28 22 70 |On".... |pf%=.("p|
|000053a0| 72 69 6e 74 65 72 3a 22 | 29 3a 65 72 72 25 3d a3 |rinter:"|):err%=.|
|000053b0| 0d 1a 18 2c 20 e7 20 70 | 66 25 3d 30 20 8c 20 85 |..., . p|f%=0 . .|
|000053c0| 20 32 35 35 2c 22 50 72 | 69 6e 74 65 72 20 6e 6f | 255,"Pr|inter no|
|000053d0| 74 20 61 76 61 69 6c 61 | 62 6c 65 22 0d 1a 22 29 |t availa|ble"..")|
|000053e0| 20 c8 99 22 50 44 72 69 | 76 65 72 5f 53 65 6c 65 | .."PDri|ver_Sele|
|000053f0| 63 74 4a 6f 62 22 2c 70 | 66 25 2c 22 57 53 20 50 |ctJob",p|f%,"WS P|
|00005400| 52 49 4e 54 22 0d 1a 2c | 30 20 c8 99 22 50 44 72 |RINT"..,|0 .."PDr|
|00005410| 69 76 65 72 5f 50 61 67 | 65 53 69 7a 65 22 20 b8 |iver_Pag|eSize" .|
|00005420| 20 52 30 2c 52 31 2c 52 | 32 2c 52 33 2c 52 34 2c | R0,R1,R|2,R3,R4,|
|00005430| 52 35 2c 52 36 0d 1a 36 | 18 20 e7 20 52 34 3c 37 |R5,R6..6|. . R4<7|
|00005440| 32 30 30 30 20 52 34 3d | 37 32 30 30 30 0d 1a 40 |2000 R4=|72000..@|
|00005450| 18 20 e7 20 52 33 3c 33 | 36 30 30 30 20 52 33 3d |. . R3<3|6000 R3=|
|00005460| 33 36 30 30 30 0d 1a 54 | 30 20 50 78 73 69 7a 65 |36000..T|0 Pxsize|
|00005470| 3d a8 28 28 52 35 2d 52 | 33 29 2f 34 30 30 29 3a |=.((R5-R|3)/400):|
|00005480| 50 79 73 69 7a 65 3d a8 | 28 28 52 36 2d 52 34 29 |Pysize=.|((R6-R4)|
|00005490| 2f 34 30 30 29 0d 1a 5e | 04 0d 1a 68 37 20 72 65 |/400)..^|...h7 re|
|000054a0| 63 74 25 21 30 3d 30 3a | 72 65 63 74 25 21 34 3d |ct%!0=0:|rect%!4=|
|000054b0| 30 3a 72 65 63 74 25 21 | 38 3d 50 78 73 69 7a 65 |0:rect%!|8=Pxsize|
|000054c0| 3a 72 65 63 74 25 21 31 | 32 3d 50 79 73 69 7a 65 |:rect%!1|2=Pysize|
|000054d0| 0d 1a 72 41 20 74 72 61 | 6e 73 25 21 30 3d 31 3c |..rA tra|ns%!0=1<|
|000054e0| 3c 31 36 3a 74 72 61 6e | 73 25 21 34 3d 30 3c 3c |<16:tran|s%!4=0<<|
|000054f0| 31 36 3a 74 72 61 6e 73 | 25 21 38 3d 30 3c 3c 31 |16:trans|%!8=0<<1|
|00005500| 36 3a 74 72 61 6e 73 25 | 21 31 32 3d 31 3c 3c 31 |6:trans%|!12=1<<1|
|00005510| 36 0d 1a 7c 73 20 70 6c | 6f 74 61 74 25 21 30 3d |6..|s pl|otat%!0=|
|00005520| 52 33 3a 70 6c 6f 74 61 | 74 25 21 34 3d 52 34 3a |R3:plota|t%!4=R4:|
|00005530| 73 63 61 6c 65 5f 79 3d | 50 79 73 69 7a 65 2f 38 |scale_y=|Pysize/8|
|00005540| 30 30 3a 73 63 61 6c 65 | 32 3d 73 63 61 6c 65 5f |00:scale|2=scale_|
|00005550| 79 3a 73 63 61 6c 65 5f | 78 3d 50 78 73 69 7a 65 |y:scale_|x=Pxsize|
|00005560| 2f 35 36 34 3a e7 20 73 | 63 61 6c 65 5f 78 3c 73 |/564:. s|cale_x<s|
|00005570| 63 61 6c 65 32 20 73 63 | 61 6c 65 32 3d 73 63 61 |cale2 sc|ale2=sca|
|00005580| 6c 65 5f 78 0d 1a 86 04 | 0d 1a 90 3f 20 c8 99 22 |le_x....|...? .."|
|00005590| 50 44 72 69 76 65 72 5f | 47 69 76 65 52 65 63 74 |PDriver_|GiveRect|
|000055a0| 61 6e 67 6c 65 22 2c 30 | 2c 72 65 63 74 25 2c 74 |angle",0|,rect%,t|
|000055b0| 72 61 6e 73 25 2c 70 6c | 6f 74 61 74 25 2c 26 46 |rans%,pl|otat%,&F|
|000055c0| 46 46 46 46 46 30 30 0d | 1a 9a 40 20 e7 20 70 72 |FFFFF00.|..@ . pr|
|000055d0| 69 6e 74 5f 70 61 75 73 | 65 3d b9 20 c8 99 22 50 |int_paus|e=. .."P|
|000055e0| 44 72 69 76 65 72 5f 44 | 72 61 77 50 61 67 65 22 |Driver_D|rawPage"|
|000055f0| 2c 31 2c 72 65 63 74 69 | 6e 25 2c 30 2c 30 20 b8 |,1,recti|n%,0,0 .|
|00005600| 20 6d 6d 6f 72 65 25 0d | 1a 9c 46 20 e7 20 70 72 | mmore%.|..F . pr|
|00005610| 69 6e 74 5f 70 61 75 73 | 65 3d a3 20 c8 99 22 50 |int_paus|e=. .."P|
|00005620| 44 72 69 76 65 72 5f 44 | 72 61 77 50 61 67 65 22 |Driver_D|rawPage"|
|00005630| 2c 63 6f 70 69 65 73 25 | 2c 72 65 63 74 69 6e 25 |,copies%|,rectin%|
|00005640| 2c 30 2c 30 20 b8 20 6d | 6d 6f 72 65 25 0d 1a a4 |,0,0 . m|more%...|
|00005650| 08 20 f7 20 85 0d 1a ae | 26 20 c8 99 22 43 6f 6c |. . ....|& .."Col|
|00005660| 6f 75 72 54 72 61 6e 73 | 5f 53 65 74 47 43 4f 4c |ourTrans|_SetGCOL|
|00005670| 22 2c 26 30 30 30 30 30 | 30 30 30 0d 1a b8 32 20 |",&00000|000...2 |
|00005680| c8 99 22 43 6f 6c 6f 75 | 72 54 72 61 6e 73 5f 53 |.."Colou|rTrans_S|
|00005690| 65 74 46 6f 6e 74 43 6f | 6c 6f 75 72 73 22 2c 2c |etFontCo|lours",,|
|000056a0| 26 46 46 46 46 46 46 30 | 30 2c 30 2c 36 0d 1a c2 |&FFFFFF0|0,0,6...|
|000056b0| 08 20 ea 20 85 0d 1a cc | 36 20 ee 20 85 20 ea 3a |. . ....|6 . . .:|
|000056c0| f7 20 85 3a c8 99 22 50 | 44 72 69 76 65 72 5f 41 |. .:.."P|Driver_A|
|000056d0| 62 6f 72 74 4a 6f 62 22 | 2c 70 66 25 3a d9 23 70 |bortJob"|,pf%:.#p|
|000056e0| 66 25 3a 65 72 72 25 3d | b9 3a e1 0d 1a d6 0e 20 |f%:err%=|.:..... |
|000056f0| c8 95 20 6d 6d 6f 72 65 | 25 0d 1a e0 19 20 20 f2 |.. mmore|%....  .|
|00005700| 73 74 79 6c 65 31 28 73 | 63 61 6c 65 32 2c 30 2c |style1(s|cale2,0,|
|00005710| 30 29 0d 1a ea 38 20 20 | c8 99 22 50 44 72 69 76 |0)...8  |.."PDriv|
|00005720| 65 72 5f 47 65 74 52 65 | 63 74 61 6e 67 6c 65 22 |er_GetRe|ctangle"|
|00005730| 2c 2c 72 65 63 74 69 6e | 25 20 b8 20 6d 6d 6f 72 |,,rectin|% . mmor|
|00005740| 65 25 2c 2c 72 65 63 69 | 64 25 0d 1a f4 06 20 ce |e%,,reci|d%.... .|
|00005750| 0d 1a fe 37 20 c8 99 22 | 50 44 72 69 76 65 72 5f |...7 .."|PDriver_|
|00005760| 45 6e 64 4a 6f 62 22 2c | 70 66 25 3a c8 99 22 48 |EndJob",|pf%:.."H|
|00005770| 6f 75 72 67 6c 61 73 73 | 5f 4f 66 66 22 3a f7 20 |ourglass|_Off":. |
|00005780| 85 3a d9 23 70 66 25 0d | 1b 08 06 20 e1 0d 1b 12 |.:.#pf%.|... ....|
|00005790| 10 20 f4 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 0d 1b 1c |. .-----|-----...|
|000057a0| 22 20 dd f2 73 74 79 6c | 65 31 28 73 63 61 6c 65 |" ..styl|e1(scale|
|000057b0| 2c 74 78 70 6f 73 25 2c | 74 79 70 6f 73 25 29 0d |,txpos%,|typos%).|
|000057c0| 1b 27 20 20 f2 72 65 61 | 64 66 6f 6e 74 73 3a c8 |.'  .rea|dfonts:.|
|000057d0| 99 22 48 6f 75 72 67 6c | 61 73 73 5f 4f 6e 22 0d |."Hourgl|ass_On".|
|000057e0| 1b 30 16 20 e7 20 70 72 | 6e 74 5f 73 74 61 74 75 |.0. . pr|nt_statu|
|000057f0| 73 3d 30 20 8c 0d 1b 3a | 44 20 20 c8 99 22 4f 53 |s=0 ...:|D  .."OS|
|00005800| 5f 53 70 72 69 74 65 4f | 70 22 2c 33 31 36 2c 67 |_SpriteO|p",316,g|
|00005810| 72 61 62 5f 6d 65 6d 73 | 74 61 72 74 2c 22 67 72 |rab_mems|tart,"gr|
|00005820| 61 62 22 2c 6d 69 6b 20 | b8 20 52 52 30 2c 52 52 |ab",mik |. RR0,RR|
|00005830| 31 2c 52 52 32 2c 52 52 | 33 0d 1b 44 58 20 20 ea |1,RR2,RR|3..DX  .|
|00005840| 20 85 3a ee 20 85 20 ea | 3a c8 99 22 4f 53 5f 53 | .:. . .|:.."OS_S|
|00005850| 70 72 69 74 65 4f 70 22 | 2c 52 52 30 2c 52 52 31 |priteOp"|,RR0,RR1|
|00005860| 2c 52 52 32 2c 52 52 33 | 3a c8 99 22 48 6f 75 72 |,RR2,RR3|:.."Hour|
|00005870| 67 6c 61 73 73 5f 53 6d | 61 73 68 22 3a ef 32 36 |glass_Sm|ash":.26|
|00005880| 3a db 3a f1 f6 24 3a f1 | c3 9e 3a 5a 24 3d be 3a |:.:..$:.|..:Z$=.:|
|00005890| fa 0d 1b 4e 2c 20 20 c8 | 99 22 57 69 6d 70 5f 53 |...N,  .|."Wimp_S|
|000058a0| 65 74 43 6f 6c 6f 75 72 | 22 2c 30 3a c8 93 20 c8 |etColour|",0:.. .|
|000058b0| 90 20 30 2c 30 2c 36 30 | 30 2c 39 30 30 0d 1b 58 |. 0,0,60|0,900..X|
|000058c0| 06 20 cd 0d 1b 62 39 20 | e7 20 62 6f 72 64 65 72 |. ...b9 |. border|
|000058d0| 25 3d b9 20 f2 62 6f 72 | 64 65 72 5f 64 72 61 77 |%=. .bor|der_draw|
|000058e0| 62 69 74 28 30 2c 30 2c | 35 36 32 2a 73 63 61 6c |bit(0,0,|562*scal|
|000058f0| 65 2c 37 39 38 2a 73 63 | 61 6c 65 29 0d 1b 6c 28 |e,798*sc|ale)..l(|
|00005900| 20 f2 64 69 73 70 6c 61 | 79 5f 63 6c 75 65 73 32 | .displa|y_clues2|
|00005910| 28 36 32 2a 73 63 61 6c | 65 2c 33 30 34 2a 73 63 |(62*scal|e,304*sc|
|00005920| 61 6c 65 29 0d 1b 76 35 | 20 f2 64 69 73 70 6c 61 |ale)..v5| .displa|
|00005930| 79 5f 67 72 69 64 28 35 | 36 32 2f 32 2a 73 63 61 |y_grid(5|62/2*sca|
|00005940| 6c 65 2c 33 33 34 2a 73 | 63 61 6c 65 2c 28 33 37 |le,334*s|cale,(37|
|00005950| 30 2a 73 63 61 6c 65 29 | 29 0d 1b 8a 13 20 f2 64 |0*scale)|).... .d|
|00005960| 69 73 70 6c 61 79 5f 74 | 69 74 6c 65 0d 1b 94 4c |isplay_t|itle...L|
|00005970| 20 e7 20 70 72 6e 74 5f | 73 74 61 74 75 73 3d 30 | . prnt_|status=0|
|00005980| 20 c8 99 22 4f 53 5f 53 | 70 72 69 74 65 4f 70 22 | .."OS_S|priteOp"|
|00005990| 2c 52 52 30 2c 52 52 31 | 2c 52 52 32 2c 52 52 33 |,RR0,RR1|,RR2,RR3|
|000059a0| 3a c8 99 22 48 6f 75 72 | 67 6c 61 73 73 5f 53 6d |:.."Hour|glass_Sm|
|000059b0| 61 73 68 22 3a f7 20 85 | 0d 1b 9e 06 20 e1 0d 1b |ash":. .|.... ...|
|000059c0| a8 10 20 f4 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 0d 1b |.. .----|------..|
|000059d0| b2 0e 20 dd f2 70 61 6c | 69 6e 69 74 0d 1b bc 1c |.. ..pal|init....|
|000059e0| 20 70 30 25 21 30 3d 26 | 66 66 66 66 66 66 30 30 | p0%!0=&|ffffff00|
|000059f0| 3a 70 30 25 21 34 3d 30 | 0d 1b c6 3d 20 70 31 25 |:p0%!4=0|...= p1%|
|00005a00| 21 30 3d 26 66 66 66 66 | 66 66 30 30 3a 70 31 25 |!0=&ffff|ff00:p1%|
|00005a10| 21 34 3d 26 62 62 62 62 | 62 62 30 30 3a 70 31 25 |!4=&bbbb|bb00:p1%|
|00005a20| 21 38 3d 26 37 37 37 37 | 37 37 30 30 3a 70 31 25 |!8=&7777|7700:p1%|
|00005a30| 21 31 32 3d 30 0d 1b d0 | 45 20 70 32 25 21 30 3d |!12=0...|E p2%!0=|
|00005a40| 26 66 66 66 66 66 66 30 | 30 3a 70 32 25 21 34 3d |&ffffff0|0:p2%!4=|
|00005a50| 26 64 64 64 64 64 64 30 | 30 3a 70 32 25 21 38 3d |&dddddd0|0:p2%!8=|
|00005a60| 26 62 62 62 62 62 62 30 | 30 3a 70 32 25 21 31 32 |&bbbbbb0|0:p2%!12|
|00005a70| 3d 26 39 39 39 39 39 39 | 30 30 0d 1b da 40 20 70 |=&999999|00...@ p|
|00005a80| 32 25 21 31 36 3d 26 37 | 37 37 37 37 37 30 30 3a |2%!16=&7|7777700:|
|00005a90| 70 32 25 21 32 30 3d 26 | 35 35 35 35 35 35 30 30 |p2%!20=&|55555500|
|00005aa0| 3a 70 32 25 21 32 34 3d | 26 33 33 33 33 33 33 30 |:p2%!24=|&3333330|
|00005ab0| 30 3a 70 32 25 21 32 38 | 3d 30 0d 1b e4 48 20 70 |0:p2%!28|=0...H p|
|00005ac0| 32 25 21 33 32 3d 26 39 | 39 34 34 30 30 30 30 3a |2%!32=&9|9440000:|
|00005ad0| 70 32 25 21 33 36 3d 26 | 30 30 65 65 65 65 30 30 |p2%!36=&|00eeee00|
|00005ae0| 3a 70 32 25 21 34 30 3d | 26 30 30 63 63 30 30 30 |:p2%!40=|&00cc000|
|00005af0| 30 3a 70 32 25 21 34 34 | 3d 26 30 30 30 30 64 64 |0:p2%!44|=&0000dd|
|00005b00| 30 30 0d 1b ee 48 20 70 | 32 25 21 34 38 3d 26 62 |00...H p|2%!48=&b|
|00005b10| 62 65 65 65 65 30 30 3a | 70 32 25 21 35 32 3d 26 |beeee00:|p2%!52=&|
|00005b20| 30 30 38 38 35 35 30 30 | 3a 70 32 25 21 35 36 3d |00885500|:p2%!56=|
|00005b30| 26 30 30 62 62 66 66 30 | 30 3a 70 32 25 21 36 30 |&00bbff0|0:p2%!60|
|00005b40| 3d 26 66 66 62 62 30 30 | 30 30 0d 1b f8 45 20 70 |=&ffbb00|00...E p|
|00005b50| 33 25 21 30 3d 26 30 30 | 30 30 30 30 30 30 3a 70 |3%!0=&00|000000:p|
|00005b60| 33 25 21 34 3d 26 31 30 | 31 30 31 30 30 30 3a 70 |3%!4=&10|101000:p|
|00005b70| 33 25 21 38 3d 26 32 30 | 32 30 32 30 30 30 3a 70 |3%!8=&20|202000:p|
|00005b80| 33 25 21 31 32 3d 26 33 | 30 33 30 33 30 30 30 0d |3%!12=&3|0303000.|
|00005b90| 1c 02 48 20 70 33 25 21 | 31 36 3d 26 30 30 30 30 |..H p3%!|16=&0000|
|00005ba0| 34 30 30 30 3a 70 33 25 | 21 32 30 3d 26 31 30 31 |4000:p3%|!20=&101|
|00005bb0| 30 35 30 30 30 3a 70 33 | 25 21 32 34 3d 26 32 30 |05000:p3|%!24=&20|
|00005bc0| 32 30 36 30 30 30 3a 70 | 33 25 21 32 38 3d 26 33 |206000:p|3%!28=&3|
|00005bd0| 30 33 30 37 30 30 30 0d | 1c 0c 48 20 70 33 25 21 |0307000.|..H p3%!|
|00005be0| 33 32 3d 26 34 30 30 30 | 30 30 30 30 3a 70 33 25 |32=&4000|0000:p3%|
|00005bf0| 21 33 36 3d 26 35 30 31 | 30 31 30 30 30 3a 70 33 |!36=&501|01000:p3|
|00005c00| 25 21 34 30 3d 26 36 30 | 32 30 32 30 30 30 3a 70 |%!40=&60|202000:p|
|00005c10| 33 25 21 34 34 3d 26 37 | 30 33 30 33 30 30 30 0d |3%!44=&7|0303000.|
|00005c20| 1c 16 48 20 70 33 25 21 | 34 38 3d 26 34 30 30 30 |..H p3%!|48=&4000|
|00005c30| 34 30 30 30 3a 70 33 25 | 21 35 32 3d 26 35 30 31 |4000:p3%|!52=&501|
|00005c40| 30 35 30 30 30 3a 70 33 | 25 21 35 36 3d 26 36 30 |05000:p3|%!56=&60|
|00005c50| 32 30 36 30 30 30 3a 70 | 33 25 21 36 30 3d 26 37 |206000:p|3%!60=&7|
|00005c60| 30 33 30 37 30 30 30 0d | 1c 20 06 20 e1 0d 1c 2a |0307000.|. . ...*|
|00005c70| 10 20 f4 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 0d 1c 34 |. .-----|-----..4|
|00005c80| 16 20 dd f2 62 6f 72 64 | 65 72 73 6d 65 6e 75 28 |. ..bord|ersmenu(|
|00005c90| 6d 25 29 0d 1c 3e 4c 20 | 6d 25 3f 31 32 3d 37 3a |m%)..>L |m%?12=7:|
|00005ca0| 6d 25 3f 31 33 3d 32 3a | 6d 25 3f 31 34 3d 37 3a |m%?13=2:|m%?14=7:|
|00005cb0| 6d 25 3f 31 35 3d 30 3a | 6d 25 21 31 36 3d 31 33 |m%?15=0:|m%!16=13|
|00005cc0| 2a 31 36 3a 6d 25 21 32 | 30 3d 34 34 3a 6d 25 21 |*16:m%!2|0=44:m%!|
|00005cd0| 32 34 3d 30 3a 70 74 72 | 25 3d 6d 25 2b 32 38 0d |24=0:ptr|%=m%+28.|
|00005ce0| 1c 48 1a 20 f2 72 6d 28 | 22 4d 55 41 32 22 29 3a |.H. .rm(|"MUA2"):|
|00005cf0| 24 6d 25 3d 74 65 78 74 | 24 0d 1c 52 55 20 6d 65 |$m%=text|$..RU me|
|00005d00| 6e 75 24 3d 22 57 69 70 | 65 20 62 6f 72 64 65 72 |nu$="Wip|e border|
|00005d10| 22 3a 70 74 72 25 21 30 | 3d 32 3a 70 74 72 25 21 |":ptr%!0|=2:ptr%!|
|00005d20| 34 3d 2d 31 3a 70 74 72 | 25 21 38 3d 26 37 30 30 |4=-1:ptr|%!8=&700|
|00005d30| 30 30 32 31 3a 24 28 70 | 74 72 25 2b 31 32 29 3d |0021:$(p|tr%+12)=|
|00005d40| 6d 65 6e 75 24 3a 70 74 | 72 25 2b 3d 32 34 0d 1c |menu$:pt|r%+=24..|
|00005d50| 5c 1b 20 e3 20 72 72 3d | 31 20 b8 20 62 6f 72 64 |\. . rr=|1 . bord|
|00005d60| 65 72 73 6e 75 6d 62 65 | 72 0d 1c 66 18 20 20 6d |ersnumbe|r..f.  m|
|00005d70| 65 6e 75 24 3d 62 6f 72 | 64 65 72 73 24 28 72 72 |enu$=bor|ders$(rr|
|00005d80| 29 0d 1c 70 42 20 20 70 | 74 72 25 21 30 3d 30 3a |)..pB  p|tr%!0=0:|
|00005d90| 70 74 72 25 21 34 3d 2d | 31 3a 70 74 72 25 21 38 |ptr%!4=-|1:ptr%!8|
|00005da0| 3d 26 37 30 30 30 30 32 | 31 3a 24 28 70 74 72 25 |=&700002|1:$(ptr%|
|00005db0| 2b 31 32 29 3d 6d 65 6e | 75 24 3a 70 74 72 25 2b |+12)=men|u$:ptr%+|
|00005dc0| 3d 32 34 0d 1c 7a 06 20 | ed 0d 1c 84 1c 20 70 74 |=24..z. |..... pt|
|00005dd0| 72 25 21 2d 32 34 3d 70 | 74 72 25 21 2d 32 34 20 |r%!-24=p|tr%!-24 |
|00005de0| 84 20 26 38 30 0d 1c 8e | 06 20 e1 0d 1c 98 10 20 |. &80...|. ..... |
|00005df0| f4 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 0d 1c a2 19 20 |.-------|---.... |
|00005e00| dd f2 66 6f 6e 74 6d 65 | 6e 75 28 6d 25 2c 6d 61 |..fontme|nu(m%,ma|
|00005e10| 74 63 68 29 0d 1c ac 16 | 20 63 6f 66 24 3d 22 22 |tch)....| cof$=""|
|00005e20| 3a 6d 61 74 63 68 24 3d | 22 22 0d 1c b6 4a 20 6d |:match$=|""...J m|
|00005e30| 25 3f 31 32 3d 37 3a 6d | 25 3f 31 33 3d 32 3a 6d |%?12=7:m|%?13=2:m|
|00005e40| 25 3f 31 34 3d 37 3a 6d | 25 3f 31 35 3d 30 3a 6d |%?14=7:m|%?15=0:m|
|00005e50| 25 21 31 36 3d 32 34 34 | 3a 6d 25 21 32 30 3d 34 |%!16=244|:m%!20=4|
|00005e60| 34 3a 6d 25 21 32 34 3d | 30 3a 70 74 72 25 3d 6d |4:m%!24=|0:ptr%=m|
|00005e70| 25 2b 32 38 0d 1c c0 20 | 20 f2 72 6d 28 22 54 58 |%+28... | .rm("TX|
|00005e80| 54 31 22 29 3a 24 6d 25 | 3d 22 46 6f 6e 74 20 45 |T1"):$m%|="Font E|
|00005e90| 64 69 74 22 0d 1c ca 27 | 20 e7 20 4d 55 24 3d 22 |dit"...'| . MU$="|
|00005ea0| 47 72 69 64 22 20 f2 72 | 6d 28 22 54 58 54 32 22 |Grid" .r|m("TXT2"|
|00005eb0| 29 3a 24 6d 25 3d 74 65 | 78 74 24 0d 1c d4 28 20 |):$m%=te|xt$...( |
|00005ec0| e7 20 4d 55 24 3d 22 54 | 69 74 6c 65 22 20 f2 72 |. MU$="T|itle" .r|
|00005ed0| 6d 28 22 54 58 54 33 22 | 29 3a 24 6d 25 3d 74 65 |m("TXT3"|):$m%=te|
|00005ee0| 78 74 24 0d 1c de 27 20 | e7 20 4d 55 24 3d 22 54 |xt$...' |. MU$="T|
|00005ef0| 65 78 74 22 20 f2 72 6d | 28 22 54 58 54 34 22 29 |ext" .rm|("TXT4")|
|00005f00| 3a 24 6d 25 3d 74 65 78 | 74 24 0d 1c e8 1a 20 e7 |:$m%=tex|t$.... .|
|00005f10| 20 4d 55 24 3d 22 54 72 | 79 22 20 24 6d 25 3d 22 | MU$="Tr|y" $m%="|
|00005f20| 54 72 79 22 0d 1c f2 52 | 20 70 74 72 25 21 30 3d |Try"...R| ptr%!0=|
|00005f30| 32 3a 70 74 72 25 21 34 | 3d 63 6f 6c 6d 65 6e 75 |2:ptr%!4|=colmenu|
|00005f40| 3a 70 74 72 25 21 38 3d | 26 37 30 30 30 30 32 31 |:ptr%!8=|&7000021|
|00005f50| 3a f2 72 6d 28 22 54 58 | 54 35 22 29 3a 24 28 70 |:.rm("TX|T5"):$(p|
|00005f60| 74 72 25 2b 31 32 29 3d | 74 65 78 74 24 3a 70 74 |tr%+12)=|text$:pt|
|00005f70| 72 25 2b 3d 32 34 0d 1c | fc 25 20 6f 66 66 73 65 |r%+=24..|.% offse|
|00005f80| 74 25 3d 6d 66 31 25 3a | 6f 66 66 73 65 74 32 25 |t%=mf1%:|offset2%|
|00005f90| 3d 66 6f 6e 74 6d 65 6e | 75 32 25 0d 1d 06 1d 20 |=fontmen|u2%.... |
|00005fa0| 66 66 3d 31 3a 66 6c 61 | 67 3d 30 3a 6d 61 74 63 |ff=1:fla|g=0:matc|
|00005fb0| 68 5f 66 6c 61 67 3d 30 | 0d 1d 10 06 20 f5 0d 1d |h_flag=0|.... ...|
|00005fc0| 1a 17 20 6c 3d a7 66 6f | 6e 74 73 24 28 66 66 29 |.. l=.fo|nts$(ff)|
|00005fd0| 2c 22 2e 22 29 0d 1d 24 | 19 20 e7 20 6c 3d 30 20 |,".")..$|. . l=0 |
|00005fe0| 66 6f 24 3d 66 6f 6e 74 | 73 24 28 66 66 29 0d 1d |fo$=font|s$(ff)..|
|00005ff0| 2e 26 20 e7 20 6c 3e 30 | 20 66 6f 24 3d c0 66 6f |.& . l>0| fo$=.fo|
|00006000| 6e 74 73 24 28 66 66 29 | 2c 6c 2d 31 29 3a 66 6c |nts$(ff)|,l-1):fl|
|00006010| 61 67 3d 31 0d 1d 38 04 | 0d 1d 42 12 20 e7 20 66 |ag=1..8.|..B. . f|
|00006020| 6f 24 3c 3e 63 6f 66 24 | 20 8c 0d 1d 4c 21 20 70 |o$<>cof$| ...L! p|
|00006030| 74 72 25 21 30 3d 30 3a | 70 74 72 25 21 34 3d 2d |tr%!0=0:|ptr%!4=-|
|00006040| 31 3a 70 70 3d 70 74 72 | 25 2b 34 0d 1d 56 55 20 |1:pp=ptr|%+4..VU |
|00006050| 6c 32 3d a7 66 6f 6e 74 | 73 24 28 6d 61 74 63 68 |l2=.font|s$(match|
|00006060| 29 2c 22 2e 22 29 3a e7 | 20 6c 32 3d 30 20 6d 61 |),"."):.| l2=0 ma|
|00006070| 74 63 68 24 3d 66 6f 6e | 74 73 24 28 6d 61 74 63 |tch$=fon|ts$(matc|
|00006080| 68 29 20 8b 20 6d 61 74 | 63 68 24 3d c0 66 6f 6e |h) . mat|ch$=.fon|
|00006090| 74 73 24 28 6d 61 74 63 | 68 29 2c 6c 32 2d 31 29 |ts$(matc|h),l2-1)|
|000060a0| 0d 1d 60 27 20 e7 20 66 | 6f 24 3d 6d 61 74 63 68 |..`' . f|o$=match|
|000060b0| 24 20 70 74 72 25 21 30 | 3d 31 3a 6d 61 74 63 68 |$ ptr%!0|=1:match|
|000060c0| 5f 66 6c 61 67 3d 31 0d | 1d 6a 14 20 70 74 72 25 |_flag=1.|.j. ptr%|
|000060d0| 21 38 3d 26 37 30 30 30 | 30 32 31 0d 1d 74 25 20 |!8=&7000|021..t% |
|000060e0| 24 28 70 74 72 25 2b 31 | 32 29 3d 66 6f 24 3a 63 |$(ptr%+1|2)=fo$:c|
|000060f0| 6f 66 24 3d 66 6f 24 3a | 70 74 72 25 2b 3d 32 34 |of$=fo$:|ptr%+=24|
|00006100| 0d 1d 7e 28 20 e7 20 66 | 6c 61 67 3d 31 20 66 6c |..~( . f|lag=1 fl|
|00006110| 61 67 3d 30 3a f2 6d 69 | 6e 69 66 6f 6e 74 28 6f |ag=0:.mi|nifont(o|
|00006120| 66 66 73 65 74 32 25 29 | 0d 1d 88 06 20 cd 0d 1d |ffset2%)|.... ...|
|00006130| 92 04 0d 1d 9c 16 20 66 | 66 2b 3d 31 3a fd 20 66 |...... f|f+=1:. f|
|00006140| 66 3e 66 6f 6e 74 73 25 | 0d 1d a6 1c 20 70 74 72 |f>fonts%|.... ptr|
|00006150| 25 21 2d 32 34 3d 70 74 | 72 25 21 2d 32 34 20 84 |%!-24=pt|r%!-24 .|
|00006160| 20 26 38 30 0d 1d b0 06 | 20 e1 0d 1d ba 10 20 f4 | &80....| ..... .|
|00006170| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 0d 1d c4 14 20 dd |--------|--.... .|
|00006180| f2 6d 69 6e 69 66 6f 6e | 74 28 6d 32 25 29 0d 1d |.minifon|t(m2%)..|
|00006190| ce 19 20 70 70 21 30 3d | 6d 32 25 3a 6d 61 78 77 |.. pp!0=|m2%:maxw|
|000061a0| 69 64 3d a9 66 6f 24 0d | 1d d8 53 20 6d 32 25 3f |id=.fo$.|..S m2%?|
|000061b0| 31 32 3d 37 3a 6d 32 25 | 3f 31 33 3d 32 3a 6d 32 |12=7:m2%|?13=2:m2|
|000061c0| 25 3f 31 34 3d 37 3a 6d | 32 25 3f 31 35 3d 30 3a |%?14=7:m|2%?15=0:|
|000061d0| 6d 32 25 21 31 36 3d 34 | 34 34 3a 6d 32 25 21 32 |m2%!16=4|44:m2%!2|
|000061e0| 30 3d 34 34 3a 6d 32 25 | 21 32 34 3d 30 3a 70 74 |0=44:m2%|!24=0:pt|
|000061f0| 72 32 25 3d 6d 32 25 2b | 32 38 0d 1d e2 0d 20 24 |r2%=m2%+|28.... $|
|00006200| 6d 32 25 3d 66 6f 24 0d | 1d ec 3b 20 70 74 72 32 |m2%=fo$.|..; ptr2|
|00006210| 25 21 30 3d 30 3a 70 74 | 72 32 25 21 34 3d 2d 31 |%!0=0:pt|r2%!4=-1|
|00006220| 3a 70 74 72 32 25 21 38 | 3d 26 37 30 30 30 31 32 |:ptr2%!8|=&700012|
|00006230| 31 3a 70 74 72 32 25 21 | 31 32 3d 6f 66 66 73 65 |1:ptr2%!|12=offse|
|00006240| 74 25 0d 1d f6 04 0d 1e | 00 1d 20 e7 20 6d 61 74 |t%......|.. . mat|
|00006250| 63 68 5f 66 6c 61 67 3d | 30 20 6d 61 74 63 68 24 |ch_flag=|0 match$|
|00006260| 3d 22 22 0d 1e 0a 04 0d | 1e 14 16 20 e7 20 6d 61 |="".....|... . ma|
|00006270| 74 63 68 5f 66 6c 61 67 | 3c 3e 30 20 8c 0d 1e 1e |tch_flag|<>0 ....|
|00006280| 67 20 20 6c 32 3d a7 66 | 6f 6e 74 73 24 28 6d 61 |g  l2=.f|onts$(ma|
|00006290| 74 63 68 29 2c 22 2e 22 | 29 3a e7 20 6c 32 3d 30 |tch),"."|):. l2=0|
|000062a0| 20 6d 61 74 63 68 24 3d | 66 6f 6e 74 73 24 28 6d | match$=|fonts$(m|
|000062b0| 61 74 63 68 29 20 8b 20 | 6d 61 74 63 68 24 3d c2 |atch) . |match$=.|
|000062c0| 66 6f 6e 74 73 24 28 6d | 61 74 63 68 29 2c 28 a9 |fonts$(m|atch),(.|
|000062d0| 28 66 6f 6e 74 73 24 28 | 6d 61 74 63 68 29 29 29 |(fonts$(|match)))|
|000062e0| 2d 6c 32 29 0d 1e 28 06 | 20 cd 0d 1e 32 04 0d 1e |-l2)..(.| ...2...|
|000062f0| 3c 23 20 66 6f 24 3d c2 | 66 6f 6e 74 73 24 28 66 |<# fo$=.|fonts$(f|
|00006300| 66 29 2c a9 66 6f 6e 74 | 73 24 28 66 66 29 2d 6c |f),.font|s$(ff)-l|
|00006310| 29 0d 1e 46 1b 20 e7 20 | 6d 61 74 63 68 24 3d 66 |)..F. . |match$=f|
|00006320| 6f 24 20 70 74 72 32 25 | 21 30 3d 31 0d 1e 50 1e |o$ ptr2%|!0=1..P.|
|00006330| 20 e7 20 a9 66 6f 24 3e | 6d 61 78 77 69 64 20 6d | . .fo$>|maxwid m|
|00006340| 61 78 77 69 64 3d a9 66 | 6f 24 0d 1e 5a 3b 20 24 |axwid=.f|o$..Z; $|
|00006350| 6f 66 66 73 65 74 25 3d | 66 6f 24 3a 6f 66 66 73 |offset%=|fo$:offs|
|00006360| 65 74 25 2b 3d a9 66 6f | 24 2b 31 3a 70 74 72 32 |et%+=.fo|$+1:ptr2|
|00006370| 25 21 31 36 3d 2d 31 3a | 70 74 72 32 25 21 32 30 |%!16=-1:|ptr2%!20|
|00006380| 3d a9 66 6f 24 0d 1e 64 | 14 20 66 66 2b 3d 31 3a |=.fo$..d|. ff+=1:|
|00006390| 70 74 72 32 25 2b 3d 32 | 34 0d 1e 6e 17 20 6c 3d |ptr2%+=2|4..n. l=|
|000063a0| a7 66 6f 6e 74 73 24 28 | 66 66 29 2c 22 2e 22 29 |.fonts$(|ff),".")|
|000063b0| 0d 1e 78 11 20 e7 20 6c | 3d 30 20 e5 20 8d 74 56 |..x. . l|=0 . .tV|
|000063c0| 5e 0d 1e 82 19 20 66 6f | 24 3d c0 66 6f 6e 74 73 |^.... fo|$=.fonts|
|000063d0| 24 28 66 66 29 2c 6c 2d | 31 29 0d 1e 8c 16 20 e7 |$(ff),l-|1).... .|
|000063e0| 20 24 6d 32 25 3d 66 6f | 24 20 e5 20 8d 64 6c 5d | $m2%=fo|$ . .dl]|
|000063f0| 0d 1e 96 2d 20 70 74 72 | 32 25 21 2d 32 34 3d 70 |...- ptr|2%!-24=p|
+--------+-------------------------+-------------------------+--------+--------+